Programming Languages Suite

home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual Foxpro 6.0 (Ent. Edition) / Vf6ent Extractor.EXE / TOOLS / HEXEDIT / HEXEDIT.VCT < prev next >
Unknown | 1998-05-26 | 20.7 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type
`100%`	file	data	default
`100%`	TrID	MacBinary 1	default (weak)
`100%`	siegfried	x-fmt/342 Microsoft FoxPro Memo	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 52 f8 00 00 00 01 | 00 00 00 00 00 00 00 00 |..R.....|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00000210| 3d 20 20 30 2e 30 32 39 | 00 00 00 01 00 00 00 21 |=  0.029|.......!|
|00000220| 41 72 69 61 6c 2c 20 30 | 2c 20 39 2c 20 35 2c 20 |Arial, 0|, 9, 5, |
|00000230| 31 35 2c 20 31 32 2c 20 | 32 31 2c 20 33 2c 20 30 |15, 12, |21, 3, 0|
|00000240| 0a 00 00 00 01 00 00 00 | 0b 72 65 66 75 73 65 66 |........|.refusef|
|00000250| 6f 63 75 73 00 00 00 01 | 00 00 00 06 50 69 78 65 |ocus....|....Pixe|
|00000260| 6c 73 00 00 00 01 00 00 | 00 49 49 66 20 75 73 65 |ls......|.IIf use|
|00000270| 72 20 61 74 74 65 6d 70 | 74 73 20 74 6f 20 67 69 |r attemp|ts to gi|
|00000280| 76 65 20 63 6f 6c 75 6d | 6e 20 66 6f 63 75 73 2c |ve colum|n focus,|
|00000290| 20 66 6f 63 75 73 20 69 | 73 20 6d 6f 76 65 64 20 | focus i|s moved |
|000002a0| 74 6f 20 61 64 6a 61 63 | 65 6e 74 20 63 6f 6c 75 |to adjac|ent colu|
|000002b0| 6d 6e 2e 00 00 00 01 00 | 00 00 05 43 6c 61 73 73 |mn......|...Class|
|000002c0| 00 00 00 01 00 00 00 01 | 31 00 00 00 01 00 00 00 |........|1.......|
|000002d0| 07 74 65 78 74 62 6f 78 | 00 00 00 01 00 00 00 0b |.textbox|........|
|000002e0| 72 65 66 75 73 65 66 6f | 63 75 73 00 00 00 01 00 |refusefo|cus.....|
|000002f0| 00 02 eb fe f2 ff 20 02 | 01 00 00 00 d2 02 00 00 |...... .|........|
|00000300| d2 02 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000310| 00 00 00 00 00 00 00 00 | 00 00 56 2f 01 00 00 00 |........|..V/....|
|00000320| 25 00 00 00 31 02 00 00 | 00 00 00 00 89 02 00 00 |%...1...|........|
|00000330| 23 00 00 00 43 02 00 00 | 00 00 00 00 00 00 00 00 |#...C...|........|
|00000340| 36 03 00 03 00 55 00 00 | 8a 01 10 00 54 f7 00 00 |6....U..|....T...|
|00000350| 10 fc f4 01 00 f7 00 00 | fd fe 13 00 a6 fc f4 02 |........|........|
|00000360| 00 f4 03 00 f7 03 00 fd | f9 05 83 01 fe 0d 00 18 |........|........|
|00000370| 48 f9 05 30 00 f9 05 7f | 01 fe 12 00 0c fc e2 f7 |H..0....|........|
|00000380| 04 00 f8 01 01 10 fd f9 | 05 c1 00 fe 11 00 25 fc |........|......%.|
|00000390| f7 00 00 f8 01 02 10 fd | f9 05 aa 00 fe 0e 00 54 |........|.......T|
|000003a0| f4 05 00 f7 06 00 10 fc | 61 fd fe 0b 00 99 e2 f4 |........|a.......|
|000003b0| 07 00 f7 08 00 fe 1a 00 | 25 fc 43 d9 07 00 48 45 |........|%.C...HE|
|000003c0| 58 45 44 49 54 4f f8 01 | 01 11 fd f9 05 90 00 fe |XEDITO..|........|
|000003d0| 0a 00 48 fc f9 02 ff ff | fd fe 04 00 1e fe 08 00 |..H.....|........|
|000003e0| 99 e2 f7 09 00 fe 0e 00 | 54 f4 05 00 f7 06 00 10 |........|T.......|
|000003f0| fc 2d fd fe 08 00 1b f9 | 05 bd 00 fe 0b 00 99 e2 |.-......|........|
|00000400| f4 0a 00 f7 08 00 fe 04 | 00 1e fe 12 00 0c fc e2 |........|........|
|00000410| f7 04 00 f8 02 12 10 fd | f9 05 6c 01 fe 11 00 25 |........|..l....%|
|00000420| fc f7 00 00 f8 02 11 10 | fd f9 05 55 01 fe 23 00 |........|...U..#.|
|00000430| 25 fc 43 d9 07 00 48 45 | 58 45 44 49 54 4f 43 d9 |%.C...HE|XEDITOC.|
|00000440| 07 00 48 45 58 45 44 49 | 54 4e 0d fd f9 05 3e 01 |..HEXEDI|TN....>.|
|00000450| fe 0e 00 54 f4 05 00 f7 | 06 00 10 fc 61 fd fe 0b |...T....|....a...|
|00000460| 00 99 e2 f4 0a 00 f7 08 | 00 fe 08 00 48 16 f7 0b |........|....H...|
|00000470| 00 fe 08 00 99 e2 f7 09 | 00 fe 0e 00 54 f4 05 00 |........|....T...|
|00000480| f7 06 00 10 fc 2d fd fe | 08 00 1b f9 05 51 01 fe |.....-..|.....Q..|
|00000490| 0b 00 99 e2 f4 07 00 f7 | 08 00 fe 04 00 1e fe 08 |........|........|
|000004a0| 00 1b f9 05 68 01 fe 0b | 00 99 e2 f4 07 00 f7 08 |....h...|........|
|000004b0| 00 fe 04 00 1e fe 08 00 | 32 f9 05 7f 01 fe 0b 00 |........|2.......|
|000004c0| 99 e2 f4 0a 00 f7 08 00 | fe 04 00 1c fe 04 00 a7 |........|........|
|000004d0| fe 03 00 55 0c 00 07 00 | 4e 43 4f 4c 4e 55 4d 0b |...U....|NCOLNUM.|
|000004e0| 00 54 48 49 53 46 4f 52 | 4d 53 45 54 04 00 54 48 |.THISFOR|MSET..TH|
|000004f0| 49 53 06 00 50 41 52 45 | 4e 54 0c 00 41 43 54 49 |IS..PARE|NT..ACTI|
|00000500| 56 45 43 4f 4c 55 4d 4e | 08 00 54 48 49 53 46 4f |VECOLUMN|..THISFO|
|00000510| 52 4d 0a 00 4c 4f 43 4b | 53 43 52 45 45 4e 08 00 |RM..LOCK|SCREEN..|
|00000520| 43 4f 4c 55 4d 4e 31 37 | 08 00 53 45 54 46 4f 43 |COLUMN17|..SETFOC|
|00000530| 55 53 07 00 52 45 46 52 | 45 53 48 07 00 43 4f 4c |US..REFR|ESH..COL|
|00000540| 55 4d 4e 32 07 00 48 45 | 58 45 44 49 54 08 00 47 |UMN2..HE|XEDIT..G|
|00000550| 6f 74 46 6f 63 75 73 2c | 00 00 00 00 00 ff ff 31 |otFocus,|.......1|
|00000560| 00 05 01 32 01 d1 00 21 | 01 11 01 e3 00 b1 00 a2 |...2...!|........|
|00000570| 01 a1 00 41 00 81 00 e1 | 00 81 00 b2 00 41 00 21 |...A....|.....A.!|
|00000580| 01 11 01 31 02 e3 00 b1 | 00 81 00 81 00 e1 00 81 |...1....|........|
|00000590| 00 b1 00 41 00 81 00 b1 | 00 41 00 81 00 b2 00 41 |...A....|.A.....A|
|000005a0| 00 42 00 33 00 00 00 00 | 00 00 00 00 00 00 00 00 |.B.3....|........|
|000005b0| 00 00 00 00 00 01 00 00 | 00 14 00 00 00 ab 05 00 |........|........|
|000005c0| 00 01 00 00 00 00 29 00 | 00 00 d2 02 00 00 00 00 |......).|........|
|000005d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005e0| 00 01 00 00 05 b6 50 52 | 4f 43 45 44 55 52 45 20 |......PR|OCEDURE |
|000005f0| 47 6f 74 46 6f 63 75 73 | 0d 0a 2a 2a 20 54 68 69 |GotFocus|..** Thi|
|00000600| 73 20 6f 62 6a 65 63 74 | 20 6e 65 76 65 72 20 61 |s object| never a|
|00000610| 6c 6c 6f 77 73 20 66 6f | 63 75 73 2e 20 20 4d 75 |llows fo|cus.  Mu|
|00000620| 73 74 20 64 65 63 69 64 | 65 20 77 68 65 72 65 20 |st decid|e where |
|00000630| 74 6f 20 73 65 74 20 66 | 6f 63 75 73 2c 20 74 68 |to set f|ocus, th|
|00000640| 65 6e 20 73 65 74 20 69 | 74 2e 0d 0a 2a 2a 20 49 |en set i|t...** I|
|00000650| 66 20 66 6f 63 75 73 20 | 69 73 20 63 6f 6d 69 6e |f focus |is comin|
|00000660| 67 20 66 72 6f 6d 20 74 | 68 65 20 6c 61 73 74 20 |g from t|he last |
|00000670| 68 65 78 20 63 6f 6c 75 | 6d 6e 2c 20 6d 6f 76 65 |hex colu|mn, move|
|00000680| 20 66 6f 63 75 73 20 74 | 6f 20 74 68 65 20 66 69 | focus t|o the fi|
|00000690| 72 73 74 20 63 6f 6c 75 | 6d 6e 0d 0a 2a 2a 20 6f |rst colu|mn..** o|
|000006a0| 66 20 74 68 65 20 6e 65 | 78 74 20 72 6f 77 2c 20 |f the ne|xt row, |
|000006b0| 66 6f 72 20 63 6f 6e 76 | 65 6e 69 65 6e 63 65 20 |for conv|enience |
|000006c0| 77 68 65 6e 20 65 64 69 | 74 69 6e 67 2e 0d 0a 0d |when edi|ting....|
|000006d0| 0a 6e 43 6f 6c 4e 75 6d | 20 3d 20 54 48 49 53 46 |.nColNum| = THISF|
|000006e0| 4f 52 4d 53 45 54 2e 6e | 43 6f 6c 4e 75 6d 09 26 |ORMSET.n|ColNum.&|
|000006f0| 26 20 54 48 49 53 46 4f | 52 4d 53 45 54 2e 6e 43 |& THISFO|RMSET.nC|
|00000700| 6f 6c 4e 75 6d 20 69 73 | 20 73 65 74 20 69 6e 20 |olNum is| set in |
|00000710| 74 68 65 20 67 72 69 64 | 27 73 20 42 65 66 6f 72 |the grid|'s Befor|
|00000720| 65 52 6f 77 43 6f 6c 43 | 68 61 6e 67 65 20 65 76 |eRowColC|hange ev|
|00000730| 65 6e 74 2e 0d 0a 0d 0a | 57 49 54 48 20 54 48 49 |ent.....|WITH THI|
|00000740| 53 2e 50 41 52 45 4e 54 | 2e 50 41 52 45 4e 54 09 |S.PARENT|.PARENT.|
|00000750| 09 26 26 20 54 68 65 20 | 67 72 69 64 2e 0d 0a 44 |.&& The |grid...D|
|00000760| 4f 20 43 41 53 45 0d 0a | 43 41 53 45 20 2e 41 63 |O CASE..|CASE .Ac|
|00000770| 74 69 76 65 43 6f 6c 75 | 6d 6e 20 3d 20 31 0d 0a |tiveColu|mn = 1..|
|00000780| 09 49 46 20 6e 43 6f 6c | 4e 75 6d 20 3d 20 32 09 |.IF nCol|Num = 2.|
|00000790| 26 26 20 46 6f 63 75 73 | 20 63 61 6d 65 20 66 72 |&& Focus| came fr|
|000007a0| 6f 6d 20 74 68 65 20 66 | 69 72 73 74 20 68 65 78 |om the f|irst hex|
|000007b0| 20 63 6f 6c 75 6d 6e 0d | 0a 09 09 2a 20 4d 75 73 | column.|...* Mus|
|000007c0| 74 20 6d 61 6b 65 20 73 | 75 72 65 20 6e 6f 20 6b |t make s|ure no k|
|000007d0| 65 79 73 74 72 6f 6b 65 | 73 20 61 72 65 20 61 63 |eystroke|s are ac|
|000007e0| 63 65 70 74 65 64 20 62 | 65 74 77 65 65 6e 20 74 |cepted b|etween t|
|000007f0| 68 65 0d 0a 09 09 2a 20 | 53 45 54 46 4f 43 55 53 |he....* |SETFOCUS|
|00000800| 20 61 6e 64 20 74 68 65 | 20 53 4b 49 50 20 63 6f | and the| SKIP co|
|00000810| 6d 6d 61 6e 64 73 20 62 | 65 6c 6f 77 2e 0d 0a 09 |mmands b|elow....|
|00000820| 09 54 48 49 53 46 4f 52 | 4d 2e 4c 4f 43 4b 53 43 |.THISFOR|M.LOCKSC|
|00000830| 52 45 45 4e 20 3d 20 2e | 54 2e 0d 0a 09 09 2e 43 |REEN = .|T......C|
|00000840| 6f 6c 75 6d 6e 31 37 2e | 53 45 54 46 4f 43 55 53 |olumn17.|SETFOCUS|
|00000850| 0d 0a 09 09 2a 20 49 46 | 20 77 65 20 77 65 72 65 |....* IF| we were|
|00000860| 20 68 65 72 65 2c 20 77 | 65 27 72 65 20 6d 6f 76 | here, w|e're mov|
|00000870| 69 6e 67 20 62 61 63 6b | 77 61 72 64 2e 0d 0a 09 |ing back|ward....|
|00000880| 09 49 46 20 52 45 43 4e | 4f 28 22 48 45 58 45 44 |.IF RECN|O("HEXED|
|00000890| 49 54 22 29 20 3e 20 31 | 0d 0a 09 09 09 53 4b 49 |IT") > 1|.....SKI|
|000008a0| 50 20 2d 31 0d 0a 09 09 | 45 4e 44 49 46 0d 0a 09 |P -1....|ENDIF...|
|000008b0| 09 2e 52 45 46 52 45 53 | 48 09 26 26 20 4e 65 63 |..REFRES|H.&& Nec|
|000008c0| 65 73 73 61 72 79 2c 20 | 6f 72 20 6b 65 79 73 74 |essary, |or keyst|
|000008d0| 72 6f 6b 65 73 20 63 61 | 6e 20 67 6f 20 69 6e 20 |rokes ca|n go in |
|000008e0| 77 72 6f 6e 67 20 63 65 | 6c 6c 2e 0d 0a 09 09 54 |wrong ce|ll.....T|
|000008f0| 48 49 53 46 4f 52 4d 2e | 4c 4f 43 4b 53 43 52 45 |HISFORM.|LOCKSCRE|
|00000900| 45 4e 20 3d 20 2e 46 2e | 0d 0a 09 45 4c 53 45 0d |EN = .F.|...ELSE.|
|00000910| 0a 09 09 26 26 20 43 6c | 69 63 6b 65 64 20 66 72 |...&& Cl|icked fr|
|00000920| 6f 6d 20 73 6f 6d 65 77 | 68 65 72 65 20 65 6c 73 |om somew|here els|
|00000930| 65 2c 20 6f 72 20 67 6f | 74 20 66 6f 63 75 73 20 |e, or go|t focus |
|00000940| 62 79 20 70 72 67 2e 0d | 0a 09 09 2e 43 6f 6c 75 |by prg..|....Colu|
|00000950| 6d 6e 32 2e 53 45 54 46 | 4f 43 55 53 0d 0a 09 45 |mn2.SETF|OCUS...E|
|00000960| 4e 44 49 46 0d 0a 43 41 | 53 45 20 2e 41 63 74 69 |NDIF..CA|SE .Acti|
|00000970| 76 65 43 6f 6c 75 6d 6e | 20 3d 20 31 38 0d 0a 09 |veColumn| = 18...|
|00000980| 09 49 46 20 6e 43 6f 6c | 4e 75 6d 20 3d 20 31 37 |.IF nCol|Num = 17|
|00000990| 09 26 26 20 46 6f 63 75 | 73 20 63 61 6d 65 20 66 |.&& Focu|s came f|
|000009a0| 72 6f 6d 20 6c 61 73 74 | 20 48 65 78 20 63 6f 6c |rom last| Hex col|
|000009b0| 75 6d 6e 2c 20 77 65 20 | 6d 75 73 74 20 62 65 20 |umn, we |must be |
|000009c0| 6d 6f 76 69 6e 67 20 66 | 6f 72 77 61 72 64 0d 0a |moving f|orward..|
|000009d0| 09 09 09 49 46 20 52 45 | 43 4e 4f 28 22 48 45 58 |...IF RE|CNO("HEX|
|000009e0| 45 44 49 54 22 29 20 3c | 20 52 45 43 43 4f 55 4e |EDIT") <| RECCOUN|
|000009f0| 54 28 22 48 45 58 45 44 | 49 54 22 29 0d 0a 09 09 |T("HEXED|IT")....|
|00000a00| 09 09 2a 20 4d 75 73 74 | 20 6d 61 6b 65 20 73 75 |..* Must| make su|
|00000a10| 72 65 20 6e 6f 20 6b 65 | 79 73 74 72 6f 6b 65 73 |re no ke|ystrokes|
|00000a20| 20 61 72 65 20 61 63 63 | 65 70 74 65 64 20 62 65 | are acc|epted be|
|00000a30| 74 77 65 65 6e 20 74 68 | 65 0d 0a 09 09 09 09 2a |tween th|e......*|
|00000a40| 20 53 45 54 46 4f 43 55 | 53 20 61 6e 64 20 74 68 | SETFOCU|S and th|
|00000a50| 65 20 53 4b 49 50 20 63 | 6f 6d 6d 61 6e 64 73 20 |e SKIP c|ommands |
|00000a60| 62 65 6c 6f 77 2e 0d 0a | 09 09 09 09 54 48 49 53 |below...|....THIS|
|00000a70| 46 4f 52 4d 2e 4c 4f 43 | 4b 53 43 52 45 45 4e 20 |FORM.LOC|KSCREEN |
|00000a80| 3d 20 2e 54 2e 0d 0a 09 | 09 09 09 2e 43 6f 6c 75 |= .T....|....Colu|
|00000a90| 6d 6e 32 2e 53 45 54 46 | 4f 43 55 53 0d 0a 09 09 |mn2.SETF|OCUS....|
|00000aa0| 09 09 53 4b 49 50 20 49 | 4e 20 48 45 58 45 44 49 |..SKIP I|N HEXEDI|
|00000ab0| 54 0d 0a 09 09 09 09 2e | 52 45 46 52 45 53 48 0d |T.......|REFRESH.|
|00000ac0| 0a 09 09 09 09 54 48 49 | 53 46 4f 52 4d 2e 4c 4f |.....THI|SFORM.LO|
|00000ad0| 43 4b 53 43 52 45 45 4e | 20 3d 20 2e 46 2e 0d 0a |CKSCREEN| = .F...|
|00000ae0| 09 09 09 45 4c 53 45 0d | 0a 09 09 09 09 2e 43 6f |...ELSE.|......Co|
|00000af0| 6c 75 6d 6e 31 37 2e 53 | 45 54 46 4f 43 55 53 0d |lumn17.S|ETFOCUS.|
|00000b00| 0a 09 09 09 45 4e 44 49 | 46 0d 0a 09 09 45 4c 53 |....ENDI|F....ELS|
|00000b10| 45 0d 0a 09 09 09 2e 43 | 6f 6c 75 6d 6e 31 37 2e |E......C|olumn17.|
|00000b20| 53 45 54 46 4f 43 55 53 | 0d 0a 09 09 45 4e 44 49 |SETFOCUS|....ENDI|
|00000b30| 46 0d 0a 4f 54 48 45 52 | 57 49 53 45 0d 0a 09 09 |F..OTHER|WISE....|
|00000b40| 2a 20 20 48 61 76 65 6e | 27 74 20 65 6e 74 65 72 |*  Haven|'t enter|
|00000b50| 65 64 20 61 20 68 65 78 | 20 63 6f 6c 75 6d 6e 20 |ed a hex| column |
|00000b60| 79 65 74 2e 0d 0a 09 09 | 2e 43 6f 6c 75 6d 6e 32 |yet.....|.Column2|
|00000b70| 2e 53 45 54 46 4f 43 55 | 53 0d 0a 45 4e 44 43 41 |.SETFOCU|S..ENDCA|
|00000b80| 53 45 0d 0a 0d 0a 45 4e | 44 57 49 54 48 0d 0a 0d |SE....EN|DWITH...|
|00000b90| 0a 0d 0a 45 4e 44 50 52 | 4f 43 0d 0a 00 00 00 01 |...ENDPR|OC......|
|00000ba0| 00 00 00 49 48 65 69 67 | 68 74 20 3d 20 32 33 0d |...IHeig|ht = 23.|
|00000bb0| 0a 57 69 64 74 68 20 3d | 20 31 30 30 0d 0a 46 6f |.Width =| 100..Fo|
|00000bc0| 72 65 43 6f 6c 6f 72 20 | 3d 20 32 35 35 2c 32 35 |reColor |= 255,25|
|00000bd0| 35 2c 32 35 35 0d 0a 4e | 61 6d 65 20 3d 20 22 72 |5,255..N|ame = "r|
|00000be0| 65 66 75 73 65 66 6f 63 | 75 73 22 0d 0a 00 00 00 |efusefoc|us".....|
|00000bf0| 01 00 00 00 07 74 65 78 | 74 62 6f 78 00 00 00 01 |.....tex|tbox....|
|00000c00| 00 00 00 22 43 6f 75 72 | 69 65 72 2c 20 30 2c 20 |..."Cour|ier, 0, |
|00000c10| 39 2c 20 39 2c 20 31 36 | 2c 20 31 33 2c 20 39 2c |9, 9, 16|, 13, 9,|
|00000c20| 20 33 2c 20 30 0a 00 00 | 00 01 00 00 00 05 74 65 | 3, 0...|......te|
|00000c30| 78 74 31 00 00 00 01 00 | 00 00 06 50 69 78 65 6c |xt1.....|...Pixel|
|00000c40| 73 00 00 00 01 00 00 00 | 2d 54 65 78 74 31 20 6f |s.......|-Text1 o|
|00000c50| 62 6a 65 63 74 20 66 6f | 72 20 48 65 78 20 65 64 |bject fo|r Hex ed|
|00000c60| 69 74 69 6e 67 20 70 6f | 72 74 69 6f 6e 20 6f 66 |iting po|rtion of|
|00000c70| 20 67 72 69 64 2e 00 00 | 00 01 00 00 00 05 43 6c | grid...|......Cl|
|00000c80| 61 73 73 00 00 00 01 00 | 00 00 01 31 00 00 00 01 |ass.....|...1....|
|00000c90| 00 00 00 07 74 65 78 74 | 62 6f 78 00 00 00 01 00 |....text|box.....|
|00000ca0| 00 00 05 74 65 78 74 31 | 00 00 00 01 00 00 00 0c |...text1|........|
|00000cb0| 68 65 78 69 73 76 61 6c | 69 64 0d 0a 00 00 00 01 |hexisval|id......|
|00000cc0| 00 00 07 54 fe f2 ff 20 | 02 01 00 00 00 3b 07 00 |...T... |.....;..|
|00000cd0| 00 3b 07 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.;......|........|
|00000ce0| 00 00 00 00 00 00 00 00 | 00 00 00 ce ac 03 00 00 |........|........|
|00000cf0| 00 25 00 00 00 09 06 00 | 00 00 00 00 00 d2 06 00 |.%......|........|
|00000d00| 00 45 00 00 00 48 06 00 | 00 00 00 00 00 00 00 00 |.E...H..|........|
|00000d10| 00 36 03 00 03 00 55 00 | 00 7e 00 0d 00 a6 fc f7 |.6....U.|.~......|
|00000d20| 00 00 fd f9 05 77 00 fe | 17 00 25 fc 43 e2 f4 01 |.....w..|..%.C...|
|00000d30| 00 f7 02 00 3e f8 01 00 | 11 fd f9 05 54 00 fe 14 |....>...|....T...|
|00000d40| 00 54 e2 f7 03 00 10 fc | 43 e2 f4 01 00 f7 02 00 |.T......|C.......|
|00000d50| ce fd fe 14 00 54 e2 f7 | 04 00 10 fc 43 e2 f4 01 |.....T..|....C...|
|00000d60| 00 f7 02 00 ce fd fe 08 | 00 99 e2 f7 05 00 fe 08 |........|........|
|00000d70| 00 1b f9 05 73 00 fe 17 | 00 99 fc 43 d9 09 00 42 |....s...|...C...B|
|00000d80| 61 63 6b 43 6f 6c 6f 72 | e2 f6 06 00 fd fe 04 00 |ackColor|........|
|00000d90| 1e fe 04 00 a7 fe 03 00 | 55 07 00 04 00 54 48 49 |........|U....THI|
|00000da0| 53 06 00 50 41 52 45 4e | 54 10 00 44 59 4e 41 4d |S..PAREN|T..DYNAM|
|00000db0| 49 43 42 41 43 4b 43 4f | 4c 4f 52 09 00 42 41 43 |ICBACKCO|LOR..BAC|
|00000dc0| 4b 43 4f 4c 4f 52 11 00 | 44 49 53 41 42 4c 45 44 |KCOLOR..|DISABLED|
|00000dd0| 42 41 43 4b 43 4f 4c 4f | 52 07 00 52 45 46 52 45 |BACKCOLO|R..REFRE|
|00000de0| 53 48 0e 00 52 45 53 45 | 54 54 4f 44 45 46 41 55 |SH..RESE|TTODEFAU|
|00000df0| 4c 54 58 02 0b 00 af f7 | 00 00 07 f7 01 00 fe 0d |LTX.....|........|
|00000e00| 00 18 48 f9 05 18 00 f9 | 05 4d 02 fe 33 00 0c fc |..H.....|.M..3...|
|00000e10| 43 f7 00 00 f8 02 30 f8 | 02 39 ab f1 0c 00 43 f7 |C.....0.|.9....C.|
|00000e20| 00 00 f8 02 61 f8 03 66 | ab 0b f1 0c 00 43 f7 00 |....a..f|.....C..|
|00000e30| 00 f8 02 41 f8 02 46 ab | 0b fd f9 05 4f 00 fe 04 |...A..F.|....O...|
|00000e40| 00 42 fe 11 00 0c fc f7 | 01 00 f8 01 04 12 fd f9 |.B......|........|
|00000e50| 05 64 00 fe 04 00 42 fe | 11 00 0c fc f7 00 00 f8 |.d....B.|........|
|00000e60| 02 1f 10 fd f9 05 9c 00 | fe 0d 00 99 f4 02 00 f4 |........|........|
|00000e70| 03 00 f7 04 00 fe 0d 00 | 99 f4 02 00 f4 03 00 f7 |........|........|
|00000e80| 05 00 fe 0d 00 99 fc 43 | f4 06 00 f6 04 00 fd fe |.......C|........|
|00000e90| 11 00 0c fc f7 00 00 f8 | 02 1e 10 fd f9 05 d4 00 |........|........|
|00000ea0| fe 0d 00 99 f4 02 00 f4 | 07 00 f7 04 00 fe 0d 00 |........|........|
|00000eb0| 99 f4 02 00 f4 07 00 f7 | 05 00 fe 0d 00 99 fc 43 |........|.......C|
|00000ec0| f4 06 00 f6 04 00 fd fe | 11 00 0c fc f7 00 00 f8 |........|........|
|00000ed0| 02 1d 10 fd f9 05 0c 01 | fe 0d 00 99 f4 02 00 f4 |........|........|
|00000ee0| 08 00 f7 04 00 fe 0d 00 | 99 f4 02 00 f4 08 00 f7 |........|........|
|00000ef0| 05 00 fe 0d 00 99 fc 43 | f4 06 00 f6 04 00 fd fe |.......C|........|
|00000f00| 11 00 0c fc f7 00 00 f8 | 02 17 10 fd f9 05 44 01 |........|......D.|
|00000f10| fe 0d 00 99 f4 02 00 f4 | 09 00 f7 04 00 fe 0d 00 |........|........|
|00000f20| 99 f4 02 00 f4 09 00 f7 | 05 00 fe 0d 00 99 fc 43 |........|.......C|
|00000f30| f4 06 00 f6 04 00 fd fe | 12 00 0c fc f7 00 00 f9 |........|........|
|00000f40| 02 fe ff 10 fd f9 05 90 | 01 fe 16 00 25 fc f4 0a |........|....%...|
|00000f50| 00 f4 0b 00 f4 0c 00 f7 | 0d 00 fd f9 05 8c 01 fe |........|........|
|00000f60| 10 00 99 f4 0a 00 f4 0b | 00 f4 0c 00 f7 04 00 fe |........|........|
|00000f70| 10 00 99 f4 0a 00 f4 0b | 00 f4 0c 00 f7 05 00 fe |........|........|
|00000f80| 04 00 1e fe 11 00 0c fc | f7 00 00 f8 02 56 10 fd |........|.....V..|
|00000f90| f9 05 db 01 fe 16 00 25 | fc f4 0a 00 f4 0b 00 f4 |.......%|........|
|00000fa0| 0e 00 f7 0d 00 fd f9 05 | d7 01 fe 10 00 99 f4 0a |........|........|
|00000fb0| 00 f4 0b 00 f4 0e 00 f7 | 04 00 fe 10 00 99 f4 0a |........|........|
|00000fc0| 00 f4 0b 00 f4 0e 00 f7 | 05 00 fe 04 00 1e fe 1c |........|........|
|00000fd0| 00 0c fc f7 00 00 f8 01 | 07 10 f1 08 00 f7 00 00 |........|........|
|00000fe0| f8 03 7f 10 0b fd f9 05 | f7 01 fe 3c 00 0c fc 43 |........|...<...C|
|00000ff0| f7 00 00 f8 01 00 f8 02 | 19 ab f1 0c 00 43 f7 00 |........|.....C..|
|00001000| 00 f8 02 19 f8 02 1f ab | 0b f1 09 00 f7 00 00 f8 |........|........|
|00001010| 03 94 10 03 0b f1 09 00 | f7 00 00 f8 03 a5 10 03 |........|........|
|00001020| 0b fd f9 05 37 02 fe 04 | 00 42 fe 08 00 32 f9 05 |....7...|.B...2..|
|00001030| 4d 02 fe 0e 00 03 f8 03 | 01 fc 43 f8 01 07 20 fd |M.......|..C... .|
|00001040| fe 04 00 1c fe 04 00 ac | fe 03 00 55 0f 00 08 00 |........|...U....|
|00001050| 4e 4b 45 59 43 4f 44 45 | 0d 00 4e 53 48 49 46 54 |NKEYCODE|..NSHIFT|
|00001060| 41 4c 54 43 54 52 4c 08 | 00 54 48 49 53 46 4f 52 |ALTCTRL.|.THISFOR|
|00001070| 4d 11 00 43 4d 44 50 52 | 45 56 49 4f 55 53 53 45 |M..CMDPR|EVIOUSSE|
|00001080| 43 54 4f 52 08 00 53 45 | 54 46 4f 43 55 53 05 00 |CTOR..SE|TFOCUS..|
|00001090| 43 4c 49 43 4b 04 00 54 | 48 49 53 0d 00 43 4d 44 |CLICK..T|HIS..CMD|
|000010a0| 4e 45 58 54 53 45 43 54 | 4f 52 0c 00 43 4d 44 54 |NEXTSECT|OR..CMDT|
|000010b0| 4f 50 4f 46 46 49 4c 45 | 0f 00 43 4d 44 42 4f 54 |OPOFFILE|..CMDBOT|
|000010c0| 54 4f 4d 4f 46 46 49 4c | 45 0b 00 54 48 49 53 46 |TOMOFFIL|E..THISF|
|000010d0| 4f 52 4d 53 45 54 09 00 | 48 45 58 45 44 49 54 4f |ORMSET..|HEXEDITO|
|000010e0| 52 0b 00 43 4d 44 46 49 | 4e 44 4e 45 58 54 07 00 |R..CMDFI|NDNEXT..|
|000010f0| 45 4e 41 42 4c 45 44 0f | 00 43 4d 44 46 49 4e 44 |ENABLED.|.CMDFIND|
|00001100| 50 52 45 56 49 4f 55 53 | 1a 01 0e 00 54 f4 00 00 |PREVIOUS|....T...|
|00001110| f7 01 00 10 fc 61 fd fe | 10 00 a6 fc f4 02 00 f7 |.....a..|........|
|00001120| 03 00 fd f9 05 05 01 fe | 10 00 25 fc e2 f7 04 00 |........|..%.....|
|00001130| 2d 10 fd f9 05 74 00 fe | 12 00 25 fc f4 05 00 f7 |-....t..|..%.....|
|00001140| 06 00 2d 10 fd f9 05 70 | 00 fe 0e 00 54 f4 05 00 |..-....p|....T...|
|00001150| f7 06 00 10 fc 61 fd fe | 11 00 54 f4 00 00 f4 07 |.....a..|..T.....|
|00001160| 00 f7 08 00 10 fc 61 fd | fe 11 00 54 f4 00 00 f4 |......a.|...T....|
|00001170| 09 00 f7 08 00 10 fc 61 | fd fe 04 00 1e fe 04 00 |.......a|........|
|00001180| 1e fe 17 00 54 f7 0a 00 | 10 fc 43 f4 02 00 f7 0c |....T...|..C.....|
|00001190| 00 f4 05 00 f6 0b 00 fd | fe 10 00 54 f7 0d 00 10 |........|...T....|
|000011a0| fc f4 0e 00 f7 0f 00 fd | fe 11 00 54 f7 10 00 10 |........|...T....|
|000011b0| fc e2 f4 03 00 f7 11 00 | fd fe 37 00 54 f7 0d 00 |........|..7.T...|
|000011c0| 10 fc 43 f7 0d 00 f7 10 | 00 f8 01 02 08 3d 43 f7 |..C.....|.....=C.|
|000011d0| 0a 00 20 06 43 f7 10 00 | f8 02 11 0d f2 0b 00 43 |.. .C...|.......C|
|000011e0| f7 0d 00 f7 10 00 5c f3 | 03 00 d9 00 00 36 06 fd |......\.|.....6..|
|000011f0| fe 10 00 3e f4 0e 00 f7 | 0f 00 d1 fc f7 0d 00 fd |...>....|........|
|00001200| fe 0e 00 99 e2 f4 03 00 | f4 12 00 f7 13 00 fe 04 |........|........|
|00001210| 00 a7 fe 0e 00 54 f4 00 | 00 f7 01 00 10 fc 2d fd |.....T..|......-.|
|00001220| fe 03 00 55 14 00 08 00 | 54 48 49 53 46 4f 52 4d |...U....|THISFORM|
|00001230| 0a 00 4c 4f 43 4b 53 43 | 52 45 45 4e 04 00 54 48 |..LOCKSC|REEN..TH|
|00001240| 49 53 06 00 50 41 52 45 | 4e 54 08 00 52 45 41 44 |IS..PARE|NT..READ|
|00001250| 4f 4e 4c 59 0b 00 54 48 | 49 53 46 4f 52 4d 53 45 |ONLY..TH|ISFORMSE|
|00001260| 54 0c 00 4c 53 45 43 54 | 4f 52 44 49 52 54 59 0c |T..LSECT|ORDIRTY.|
|00001270| 00 43 4d 44 53 41 56 45 | 45 44 49 54 53 07 00 45 |.CMDSAVE|EDITS..E|
|00001280| 4e 41 42 4c 45 44 0e 00 | 43 4d 44 52 45 56 45 52 |NABLED..|CMDREVER|
|00001290| 54 45 44 49 54 53 0a 00 | 4e 41 53 43 49 49 43 4f |TEDITS..|NASCIICO|
|000012a0| 44 45 07 00 48 45 58 32 | 44 45 43 05 00 56 41 4c |DE..HEX2|DEC..VAL|
|000012b0| 55 45 09 00 43 54 45 4d | 50 54 45 58 54 07 00 48 |UE..CTEM|PTEXT..H|
|000012c0| 45 58 45 44 49 54 04 00 | 54 45 58 54 07 00 4e 43 |EXEDIT..|TEXT..NC|
|000012d0| 4f 4c 4e 55 4d 0c 00 41 | 43 54 49 56 45 43 4f 4c |OLNUM..A|CTIVECOL|
|000012e0| 55 4d 4e 08 00 43 4f 4c | 55 4d 4e 31 38 07 00 52 |UMN..COL|UMN18..R|
|000012f0| 45 46 52 45 53 48 08 00 | 47 6f 74 46 6f 63 75 73 |EFRESH..|GotFocus|
|00001300| 2c 00 00 00 00 00 ff ff | 08 00 4b 65 79 50 72 65 |,.......|..KeyPre|
|00001310| 73 73 05 01 00 00 00 00 | ff ff 11 00 49 6e 74 65 |ss......|....Inte|
|00001320| 72 61 63 74 69 76 65 43 | 68 61 6e 67 65 1b 04 00 |ractiveC|hange...|
|00001330| 00 00 00 ff ff 31 00 d3 | 00 71 01 41 01 43 01 81 |.....1..|.q.A.C..|
|00001340| 00 81 00 72 01 41 00 41 | 00 33 00 b1 00 d3 00 32 |...r.A.A|.3.....2|
|00001350| 03 41 00 11 01 41 00 11 | 01 d1 00 d1 00 d1 00 11 |.A...A..|........|
|00001360| 01 d1 00 d1 00 d1 00 11 | 01 d1 00 d1 00 d1 00 11 |........|........|
|00001370| 01 d1 00 d1 00 d1 00 21 | 01 61 01 01 01 01 01 41 |.......!|.a.....A|
|00001380| 00 11 01 61 01 01 01 01 | 01 41 00 c2 01 c3 03 41 |...a....|.A.....A|
|00001390| 00 81 00 e1 00 41 00 43 | 00 32 00 e3 00 02 01 01 |.....A.C|.2......|
|000013a0| 01 21 01 e1 00 11 01 11 | 01 41 00 41 00 72 01 03 |.!......|.A.A.r..|
|000013b0| 01 11 01 71 03 01 01 e1 | 00 41 00 e2 00 31 00 00 |...q....|.A...1..|
|000013c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|000013d0| 00 00 00 14 00 00 00 f0 | 01 00 00 01 00 00 00 0b |........|........|
|000013e0| 00 00 00 0f 02 00 00 70 | 09 00 00 12 00 00 00 33 |.......p|.......3|
|000013f0| 00 00 00 98 09 00 00 1c | 0d 00 00 43 00 00 00 00 |........|...C....|
|00001400| 29 00 00 00 3b 07 00 00 | 00 00 00 00 00 00 00 00 |)...;...|........|
|00001410| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 0d 27 |........|.......'|
|00001420| 50 52 4f 43 45 44 55 52 | 45 20 47 6f 74 46 6f 63 |PROCEDUR|E GotFoc|
|00001430| 75 73 0d 0a 2a 20 20 4d | 61 6b 65 20 74 65 78 74 |us..*  M|ake text|
|00001440| 62 6f 78 20 62 61 63 6b | 63 6f 6c 6f 72 20 6d 61 |box back|color ma|
|00001450| 74 63 68 20 74 68 65 20 | 64 79 6e 61 6d 69 63 20 |tch the |dynamic |
|00001460| 62 61 63 6b 63 6f 6c 6f | 72 20 28 69 66 20 70 61 |backcolo|r (if pa|
|00001470| 72 74 20 6f 66 20 22 66 | 6f 75 6e 64 22 20 73 74 |rt of "f|ound" st|
|00001480| 72 69 6e 67 29 20 6f 66 | 0d 0a 2a 20 20 69 74 73 |ring) of|..*  its|
|00001490| 20 63 65 6c 6c 20 69 6e | 20 74 68 65 20 67 72 69 | cell in| the gri|
|000014a0| 64 2e 0d 0a 57 49 54 48 | 20 54 48 49 53 0d 0a 49 |d...WITH| THIS..I|
|000014b0| 46 20 4c 45 4e 28 2e 50 | 41 52 45 4e 54 2e 44 79 |F LEN(.P|ARENT.Dy|
|000014c0| 6e 61 6d 69 63 42 61 63 | 6b 43 6f 6c 6f 72 29 20 |namicBac|kColor) |
|000014d0| 3e 20 30 0d 0a 09 2e 42 | 61 63 6b 63 6f 6c 6f 72 |> 0....B|ackcolor|
|000014e0| 20 3d 20 45 56 41 4c 55 | 41 54 45 28 2e 50 41 52 | = EVALU|ATE(.PAR|
|000014f0| 45 4e 54 2e 44 79 6e 61 | 6d 69 63 42 61 63 6b 63 |ENT.Dyna|micBackc|
|00001500| 6f 6c 6f 72 29 0d 0a 09 | 2a 20 20 49 66 20 66 69 |olor)...|*  If fi|
|00001510| 6c 65 20 69 73 20 6f 70 | 65 6e 65 64 20 72 65 61 |le is op|ened rea|
|00001520| 64 2d 6f 6e 6c 79 2c 20 | 61 6c 6c 20 74 68 65 20 |d-only, |all the |
|00001530| 74 65 78 74 62 6f 78 65 | 73 20 61 72 65 20 64 69 |textboxe|s are di|
|00001540| 73 61 62 6c 65 64 2e 0d | 0a 09 2a 20 20 53 6f 20 |sabled..|..*  So |
|00001550| 6d 75 73 74 20 73 65 74 | 20 74 68 65 20 44 69 73 |must set| the Dis|
|00001560| 61 62 6c 65 64 42 61 63 | 6b 63 6f 6c 6f 72 20 61 |abledBac|kcolor a|
|00001570| 6c 73 6f 2e 0d 0a 09 2e | 44 69 73 61 62 6c 65 64 |lso.....|Disabled|
|00001580| 42 61 63 6b 63 6f 6c 6f | 72 20 3d 20 45 56 41 4c |Backcolo|r = EVAL|
|00001590| 55 41 54 45 28 2e 50 41 | 52 45 4e 54 2e 44 79 6e |UATE(.PA|RENT.Dyn|
|000015a0| 61 6d 69 63 42 61 63 6b | 63 6f 6c 6f 72 29 0d 0a |amicBack|color)..|
|000015b0| 09 2e 52 65 66 72 65 73 | 68 0d 0a 45 4c 53 45 0d |..Refres|h..ELSE.|
|000015c0| 0a 09 2a 20 20 53 65 74 | 20 62 61 63 6b 20 74 6f |..*  Set| back to|
|000015d0| 20 63 6f 72 72 65 63 74 | 20 63 6f 6c 6f 72 2e 0d | correct| color..|
|000015e0| 0a 09 2e 52 65 73 65 74 | 54 6f 44 65 66 61 75 6c |...Reset|ToDefaul|
|000015f0| 74 28 22 42 61 63 6b 43 | 6f 6c 6f 72 22 29 0d 0a |t("BackC|olor")..|
|00001600| 45 4e 44 49 46 0d 0a 45 | 4e 44 57 49 54 48 0d 0a |ENDIF..E|NDWITH..|
|00001610| 0d 0a 45 4e 44 50 52 4f | 43 0d 0a 50 52 4f 43 45 |..ENDPRO|C..PROCE|
|00001620| 44 55 52 45 20 4b 65 79 | 50 72 65 73 73 0d 0a 4c |DURE Key|Press..L|
|00001630| 50 41 52 41 4d 45 54 45 | 52 53 20 6e 4b 65 79 43 |PARAMETE|RS nKeyC|
|00001640| 6f 64 65 2c 20 6e 53 68 | 69 66 74 41 6c 74 43 74 |ode, nSh|iftAltCt|
|00001650| 72 6c 0d 0a 0d 0a 2a 2a | 20 20 4d 75 73 74 20 62 |rl....**|  Must b|
|00001660| 65 20 6e 75 6d 65 72 69 | 63 20 6f 72 20 69 6e 20 |e numeri|c or in |
|00001670| 22 41 42 43 44 45 46 22 | 20 6f 72 20 61 72 72 6f |"ABCDEF"| or arro|
|00001680| 77 20 6b 65 79 73 20 6f | 72 20 62 6b 73 70 61 63 |w keys o|r bkspac|
|00001690| 65 2e 0d 0a 44 4f 20 43 | 41 53 45 0d 0a 09 2a 20 |e...DO C|ASE...* |
|000016a0| 50 75 74 20 76 61 6c 69 | 64 20 6b 65 79 73 74 72 |Put vali|d keystr|
|000016b0| 6f 6b 65 73 20 66 69 72 | 73 74 0d 0a 09 43 41 53 |okes fir|st...CAS|
|000016c0| 45 20 42 45 54 57 45 45 | 4e 28 6e 4b 65 79 43 6f |E BETWEE|N(nKeyCo|
|000016d0| 64 65 2c 20 34 38 2c 20 | 35 37 29 20 4f 52 20 42 |de, 48, |57) OR B|
|000016e0| 45 54 57 45 45 4e 28 6e | 4b 65 79 43 6f 64 65 2c |ETWEEN(n|KeyCode,|
|000016f0| 20 39 37 2c 20 31 30 32 | 29 20 4f 52 20 42 45 54 | 97, 102|) OR BET|
|00001700| 57 45 45 4e 28 6e 4b 65 | 79 43 6f 64 65 2c 20 36 |WEEN(nKe|yCode, 6|
|00001710| 35 2c 20 37 30 29 0d 0a | 09 09 52 45 54 55 52 4e |5, 70)..|..RETURN|
|00001720| 09 26 26 20 56 61 6c 69 | 64 20 63 68 61 72 61 63 |.&& Vali|d charac|
|00001730| 74 65 72 20 6b 65 79 73 | 74 72 6f 6b 65 2e 20 20 |ter keys|troke.  |
|00001740| 45 78 69 74 20 69 6d 6d | 65 64 69 61 74 65 6c 79 |Exit imm|ediately|
|00001750| 2e 0d 0a 09 43 41 53 45 | 20 6e 53 68 69 66 74 41 |....CASE| nShiftA|
|00001760| 6c 74 43 74 72 6c 20 3e | 3d 20 34 20 09 26 26 20 |ltCtrl >|= 4 .&& |
|00001770| 69 66 20 61 6c 74 20 68 | 65 6c 64 20 64 6f 77 6e |if alt h|eld down|
|00001780| 2e 0d 0a 09 09 52 45 54 | 55 52 4e 09 26 26 20 6e |.....RET|URN.&& n|
|00001790| 6f 20 73 70 65 63 69 61 | 6c 20 68 61 6e 64 6c 69 |o specia|l handli|
|000017a0| 6e 67 0d 0a 09 43 41 53 | 45 20 6e 4b 65 79 43 6f |ng...CAS|E nKeyCo|
|000017b0| 64 65 20 3d 20 33 31 09 | 26 26 20 43 74 72 6c 20 |de = 31.|&& Ctrl |
|000017c0| 2b 20 50 67 55 70 0d 0a | 09 09 54 48 49 53 46 4f |+ PgUp..|..THISFO|
|000017d0| 52 4d 2e 63 6d 64 50 72 | 65 76 69 6f 75 73 53 65 |RM.cmdPr|eviousSe|
|000017e0| 63 74 6f 72 2e 53 65 74 | 46 6f 63 75 73 09 26 26 |ctor.Set|Focus.&&|
|000017f0| 20 4e 65 65 64 20 74 6f | 20 67 65 74 20 66 6f 63 | Need to| get foc|
|00001800| 75 73 20 6f 75 74 20 6f | 66 20 67 72 69 64 2e 0d |us out o|f grid..|
|00001810| 0a 09 09 54 48 49 53 46 | 4f 52 4d 2e 63 6d 64 50 |...THISF|ORM.cmdP|
|00001820| 72 65 76 69 6f 75 73 53 | 65 63 74 6f 72 2e 43 4c |reviousS|ector.CL|
|00001830| 49 43 4b 0d 0a 09 09 54 | 48 49 53 2e 53 65 74 46 |ICK....T|HIS.SetF|
|00001840| 6f 63 75 73 28 29 0d 0a | 09 43 41 53 45 20 6e 4b |ocus()..|.CASE nK|
|00001850| 65 79 43 6f 64 65 20 3d | 20 33 30 09 26 26 20 43 |eyCode =| 30.&& C|
|00001860| 74 72 6c 20 2b 20 50 67 | 44 6e 0d 0a 09 09 54 48 |trl + Pg|Dn....TH|
|00001870| 49 53 46 4f 52 4d 2e 63 | 6d 64 4e 65 78 74 53 65 |ISFORM.c|mdNextSe|
|00001880| 63 74 6f 72 2e 53 65 74 | 46 6f 63 75 73 09 26 26 |ctor.Set|Focus.&&|
|00001890| 20 4e 65 65 64 20 74 6f | 20 67 65 74 20 66 6f 63 | Need to| get foc|
|000018a0| 75 73 20 6f 75 74 20 6f | 66 20 67 72 69 64 2e 0d |us out o|f grid..|
|000018b0| 0a 09 09 54 48 49 53 46 | 4f 52 4d 2e 63 6d 64 4e |...THISF|ORM.cmdN|
|000018c0| 65 78 74 53 65 63 74 6f | 72 2e 43 4c 49 43 4b 0d |extSecto|r.CLICK.|
|000018d0| 0a 09 09 54 48 49 53 2e | 53 65 74 46 6f 63 75 73 |...THIS.|SetFocus|
|000018e0| 28 29 0d 0a 09 43 41 53 | 45 20 6e 4b 65 79 43 6f |()...CAS|E nKeyCo|
|000018f0| 64 65 20 3d 20 32 39 09 | 26 26 20 43 74 72 6c 20 |de = 29.|&& Ctrl |
|00001900| 2b 20 48 6f 6d 65 0d 0a | 09 09 54 48 49 53 46 4f |+ Home..|..THISFO|
|00001910| 52 4d 2e 63 6d 64 54 6f | 70 4f 66 46 69 6c 65 2e |RM.cmdTo|pOfFile.|
|00001920| 53 65 74 46 6f 63 75 73 | 09 26 26 20 4e 65 65 64 |SetFocus|.&& Need|
|00001930| 20 74 6f 20 67 65 74 20 | 66 6f 63 75 73 20 6f 75 | to get |focus ou|
|00001940| 74 20 6f 66 20 67 72 69 | 64 2e 0d 0a 09 09 54 48 |t of gri|d.....TH|
|00001950| 49 53 46 4f 52 4d 2e 63 | 6d 64 54 6f 70 4f 66 46 |ISFORM.c|mdTopOfF|
|00001960| 69 6c 65 2e 43 4c 49 43 | 4b 0d 0a 09 09 54 48 49 |ile.CLIC|K....THI|
|00001970| 53 2e 53 65 74 46 6f 63 | 75 73 28 29 0d 0a 09 43 |S.SetFoc|us()...C|
|00001980| 41 53 45 20 6e 4b 65 79 | 43 6f 64 65 20 3d 20 32 |ASE nKey|Code = 2|
|00001990| 33 09 26 26 20 43 74 72 | 6c 20 2b 20 45 6e 64 0d |3.&& Ctr|l + End.|
|000019a0| 0a 09 09 54 48 49 53 46 | 4f 52 4d 2e 63 6d 64 42 |...THISF|ORM.cmdB|
|000019b0| 6f 74 74 6f 6d 4f 66 46 | 69 6c 65 2e 53 65 74 46 |ottomOfF|ile.SetF|
|000019c0| 6f 63 75 73 09 26 26 20 | 4e 65 65 64 20 74 6f 20 |ocus.&& |Need to |
|000019d0| 67 65 74 20 66 6f 63 75 | 73 20 6f 75 74 20 6f 66 |get focu|s out of|
|000019e0| 20 67 72 69 64 2e 0d 0a | 09 09 54 48 49 53 46 4f | grid...|..THISFO|
|000019f0| 52 4d 2e 63 6d 64 42 6f | 74 74 6f 6d 4f 66 46 69 |RM.cmdBo|ttomOfFi|
|00001a00| 6c 65 2e 43 4c 49 43 4b | 0d 0a 09 09 54 48 49 53 |le.CLICK|....THIS|
|00001a10| 2e 53 65 74 46 6f 63 75 | 73 28 29 0d 0a 09 43 41 |.SetFocu|s()...CA|
|00001a20| 53 45 20 6e 4b 65 79 63 | 6f 64 65 20 3d 20 2d 32 |SE nKeyc|ode = -2|
|00001a30| 09 26 26 6e 4b 65 79 43 | 6f 64 65 20 3d 20 31 34 |.&&nKeyC|ode = 14|
|00001a40| 35 20 41 4e 44 20 6e 53 | 68 69 66 74 41 6c 74 43 |5 AND nS|hiftAltC|
|00001a50| 74 72 6c 20 3d 20 32 09 | 26 26 20 43 74 72 6c 2b |trl = 2.|&& Ctrl+|
|00001a60| 44 6e 41 72 72 6f 77 0d | 0a 09 09 49 46 20 54 48 |DnArrow.|...IF TH|
|00001a70| 49 53 46 4f 52 4d 53 45 | 54 2e 48 65 78 45 64 69 |ISFORMSE|T.HexEdi|
|00001a80| 74 6f 72 2e 63 6d 64 46 | 69 6e 64 4e 65 78 74 2e |tor.cmdF|indNext.|
|00001a90| 45 6e 61 62 6c 65 64 0d | 0a 09 09 09 54 48 49 53 |Enabled.|....THIS|
|00001aa0| 46 4f 52 4d 53 45 54 2e | 48 65 78 45 64 69 74 6f |FORMSET.|HexEdito|
|00001ab0| 72 2e 63 6d 64 46 69 6e | 64 4e 65 78 74 2e 53 65 |r.cmdFin|dNext.Se|
|00001ac0| 74 46 6f 63 75 73 0d 0a | 09 09 09 54 48 49 53 46 |tFocus..|...THISF|
|00001ad0| 4f 52 4d 53 45 54 2e 48 | 65 78 45 64 69 74 6f 72 |ORMSET.H|exEditor|
|00001ae0| 2e 63 6d 64 46 69 6e 64 | 4e 65 78 74 2e 43 6c 69 |.cmdFind|Next.Cli|
|00001af0| 63 6b 0d 0a 09 09 45 4e | 44 49 46 0d 0a 09 43 41 |ck....EN|DIF...CA|
|00001b00| 53 45 20 6e 4b 65 79 43 | 6f 64 65 20 3d 20 38 36 |SE nKeyC|ode = 86|
|00001b10| 09 26 26 6e 4b 65 79 43 | 6f 64 65 20 3d 20 31 34 |.&&nKeyC|ode = 14|
|00001b20| 31 20 41 4e 44 20 6e 53 | 68 69 66 74 41 6c 74 43 |1 AND nS|hiftAltC|
|00001b30| 74 72 6c 20 3d 20 32 09 | 26 26 20 43 74 72 6c 2b |trl = 2.|&& Ctrl+|
|00001b40| 55 70 41 72 72 6f 77 0d | 0a 09 09 49 46 20 54 48 |UpArrow.|...IF TH|
|00001b50| 49 53 46 4f 52 4d 53 45 | 54 2e 48 65 78 45 64 69 |ISFORMSE|T.HexEdi|
|00001b60| 74 6f 72 2e 63 6d 64 46 | 69 6e 64 50 72 65 76 69 |tor.cmdF|indPrevi|
|00001b70| 6f 75 73 2e 45 6e 61 62 | 6c 65 64 0d 0a 09 09 09 |ous.Enab|led.....|
|00001b80| 54 48 49 53 46 4f 52 4d | 53 45 54 2e 48 65 78 45 |THISFORM|SET.HexE|
|00001b90| 64 69 74 6f 72 2e 63 6d | 64 46 69 6e 64 50 72 65 |ditor.cm|dFindPre|
|00001ba0| 76 69 6f 75 73 2e 53 65 | 74 46 6f 63 75 73 0d 0a |vious.Se|tFocus..|
|00001bb0| 09 09 09 54 48 49 53 46 | 4f 52 4d 53 45 54 2e 48 |...THISF|ORMSET.H|
|00001bc0| 65 78 45 64 69 74 6f 72 | 2e 63 6d 64 46 69 6e 64 |exEditor|.cmdFind|
|00001bd0| 50 72 65 76 69 6f 75 73 | 2e 43 6c 69 63 6b 0d 0a |Previous|.Click..|
|00001be0| 09 09 45 4e 44 49 46 0d | 0a 0d 0a 09 43 41 53 45 |..ENDIF.|....CASE|
|00001bf0| 20 6e 4b 65 79 43 6f 64 | 65 20 3d 20 37 20 4f 52 | nKeyCod|e = 7 OR|
|00001c00| 20 6e 4b 65 79 43 6f 64 | 65 20 3d 20 31 32 37 0d | nKeyCod|e = 127.|
|00001c10| 0a 09 09 2a 2a 20 44 6f | 20 6e 6f 74 68 69 6e 67 |...** Do| nothing|
|00001c20| 2e 20 20 57 69 6c 6c 20 | 68 69 74 20 74 68 65 20 |.  Will |hit the |
|00001c30| 4e 4f 44 45 46 41 55 4c | 54 20 61 66 74 65 72 20 |NODEFAUL|T after |
|00001c40| 74 68 65 20 44 4f 20 43 | 41 53 45 20 73 74 72 75 |the DO C|ASE stru|
|00001c50| 63 74 75 72 65 2e 0d 0a | 09 43 41 53 45 20 42 45 |cture...|.CASE BE|
|00001c60| 54 57 45 45 4e 28 6e 4b | 65 79 43 6f 64 65 2c 20 |TWEEN(nK|eyCode, |
|00001c70| 30 2c 20 32 35 29 20 4f | 52 20 42 45 54 57 45 45 |0, 25) O|R BETWEE|
|00001c80| 4e 28 6e 4b 65 79 43 6f | 64 65 20 2c 32 35 2c 33 |N(nKeyCo|de ,25,3|
|00001c90| 31 29 3b 0d 0a 09 09 4f | 52 20 28 6e 4b 65 79 43 |1);....O|R (nKeyC|
|00001ca0| 6f 64 65 20 3d 20 31 34 | 38 29 20 4f 52 20 28 6e |ode = 14|8) OR (n|
|00001cb0| 4b 65 79 43 6f 64 65 20 | 3d 20 31 36 35 29 09 26 |KeyCode |= 165).&|
|00001cc0| 26 20 41 6c 6c 20 76 61 | 6c 69 64 20 6b 65 79 73 |& All va|lid keys|
|00001cd0| 74 72 6f 6b 65 73 20 6e | 6f 74 20 61 6c 72 65 61 |trokes n|ot alrea|
|00001ce0| 64 79 20 64 65 61 6c 74 | 20 77 69 74 68 2e 0d 0a |dy dealt| with...|
|00001cf0| 09 09 52 45 54 55 52 4e | 0d 0a 09 4f 54 48 45 52 |..RETURN|...OTHER|
|00001d00| 57 49 53 45 0d 0a 09 09 | 3f 3f 20 43 48 52 28 37 |WISE....|?? CHR(7|
|00001d10| 29 09 09 0d 0a 45 4e 44 | 43 41 53 45 0d 0a 0d 0a |)....END|CASE....|
|00001d20| 2a 2a 20 49 66 20 77 65 | 20 61 72 65 20 68 65 72 |** If we| are her|
|00001d30| 65 2c 20 74 68 65 20 6b | 65 79 73 74 72 6f 6b 65 |e, the k|eystroke|
|00001d40| 20 6e 65 65 64 65 64 20 | 73 70 65 63 69 61 6c 20 | needed |special |
|00001d50| 68 61 6e 64 6c 69 6e 67 | 2c 20 61 6e 64 20 73 68 |handling|, and sh|
|00001d60| 6f 75 6c 64 20 6e 6f 74 | 20 62 65 20 70 61 73 73 |ould not| be pass|
|00001d70| 65 64 20 6f 6e 20 74 6f | 20 74 68 65 20 74 65 78 |ed on to| the tex|
|00001d80| 74 62 6f 78 2e 0d 0a 4e | 4f 44 45 46 41 55 4c 54 |tbox...N|ODEFAULT|
|00001d90| 0d 0a 45 4e 44 50 52 4f | 43 0d 0a 50 52 4f 43 45 |..ENDPRO|C..PROCE|
|00001da0| 44 55 52 45 20 49 6e 74 | 65 72 61 63 74 69 76 65 |DURE Int|eractive|
|00001db0| 43 68 61 6e 67 65 0d 0a | 2a 20 20 49 66 20 77 65 |Change..|*  If we|
|00001dc0| 27 76 65 20 65 6e 74 65 | 72 65 64 20 74 68 69 73 |'ve ente|red this|
|00001dd0| 20 65 76 65 6e 74 2c 20 | 74 68 65 20 4b 65 79 50 | event, |the KeyP|
|00001de0| 72 65 73 73 20 65 76 65 | 6e 74 20 68 61 73 20 61 |ress eve|nt has a|
|00001df0| 6c 72 65 61 64 79 20 64 | 65 63 69 64 65 64 0d 0a |lready d|ecided..|
|00001e00| 2a 20 20 74 68 61 74 20 | 69 74 20 69 73 20 61 20 |*  that |it is a |
|00001e10| 76 61 6c 69 64 20 6b 65 | 79 73 74 72 6f 6b 65 20 |valid ke|ystroke |
|00001e20| 28 30 2d 39 20 6f 72 20 | 41 2d 46 29 0d 0a 54 48 |(0-9 or |A-F)..TH|
|00001e30| 49 53 46 4f 52 4d 2e 4c | 6f 63 6b 73 63 72 65 65 |ISFORM.L|ockscree|
|00001e40| 6e 20 3d 20 2e 54 2e 0d | 0a 0d 0a 57 49 54 48 20 |n = .T..|...WITH |
|00001e50| 54 48 49 53 2e 50 41 52 | 45 4e 54 0d 0a 49 46 20 |THIS.PAR|ENT..IF |
|00001e60| 2e 52 45 41 44 4f 4e 4c | 59 20 3d 20 2e 46 2e 09 |.READONL|Y = .F..|
|00001e70| 26 26 20 49 66 20 65 64 | 69 74 69 6e 67 20 69 73 |&& If ed|iting is|
|00001e80| 20 65 6e 61 62 6c 65 64 | 2e 0d 0a 09 49 46 20 54 | enabled|....IF T|
|00001e90| 48 49 53 46 4f 52 4d 53 | 45 54 2e 6c 53 65 63 74 |HISFORMS|ET.lSect|
|00001ea0| 6f 72 44 69 72 74 79 20 | 3d 20 2e 46 2e 09 09 09 |orDirty |= .F....|
|00001eb0| 26 26 20 49 66 20 66 6c | 61 67 20 6e 6f 74 20 61 |&& If fl|ag not a|
|00001ec0| 6c 72 65 61 64 79 20 73 | 65 74 0d 0a 09 09 54 48 |lready s|et....TH|
|00001ed0| 49 53 46 4f 52 4d 53 45 | 54 2e 6c 53 65 63 74 6f |ISFORMSE|T.lSecto|
|00001ee0| 72 44 69 72 74 79 20 3d | 20 2e 54 2e 09 09 09 26 |rDirty =| .T....&|
|00001ef0| 26 20 53 65 74 20 66 6c | 61 67 20 74 68 61 74 20 |& Set fl|ag that |
|00001f00| 74 68 69 73 20 73 65 63 | 74 6f 72 20 68 61 73 20 |this sec|tor has |
|00001f10| 62 65 65 6e 20 6d 6f 64 | 69 66 69 65 64 2e 0d 0a |been mod|ified...|
|00001f20| 09 09 54 48 49 53 46 4f | 52 4d 2e 63 6d 64 53 61 |..THISFO|RM.cmdSa|
|00001f30| 76 65 45 64 69 74 73 2e | 45 4e 41 42 4c 45 44 20 |veEdits.|ENABLED |
|00001f40| 3d 20 2e 54 2e 09 09 26 | 26 20 45 6e 61 62 6c 65 |= .T...&|& Enable|
|00001f50| 20 73 61 76 65 2f 75 6e | 64 6f 20 62 75 74 74 6f | save/un|do butto|
|00001f60| 6e 73 2e 0d 0a 09 09 54 | 48 49 53 46 4f 52 4d 2e |ns.....T|HISFORM.|
|00001f70| 63 6d 64 52 65 76 65 72 | 74 45 64 69 74 73 2e 45 |cmdRever|tEdits.E|
|00001f80| 6e 61 62 6c 65 64 20 3d | 20 2e 54 2e 0d 0a 09 45 |nabled =| .T....E|
|00001f90| 4e 44 49 46 0d 0a 45 4e | 44 49 46 0d 0a 0d 0a 6e |NDIF..EN|DIF....n|
|00001fa0| 41 73 63 69 69 43 6f 64 | 65 20 3d 20 54 48 49 53 |AsciiCod|e = THIS|
|00001fb0| 46 4f 52 4d 53 45 54 2e | 48 65 78 32 44 65 63 28 |FORMSET.|Hex2Dec(|
|00001fc0| 54 48 49 53 2e 56 41 4c | 55 45 29 0d 0a 0d 0a 2a |THIS.VAL|UE)....*|
|00001fd0| 2a 20 55 70 64 61 74 65 | 20 74 68 65 20 54 65 78 |* Update| the Tex|
|00001fe0| 74 20 63 6f 6c 75 6d 6e | 2e 0d 0a 63 54 65 6d 70 |t column|...cTemp|
|00001ff0| 54 65 78 74 20 3d 20 48 | 45 58 45 44 49 54 2e 54 |Text = H|EXEDIT.T|
|00002000| 65 78 74 09 09 26 26 20 | 47 65 74 20 63 75 72 72 |ext..&& |Get curr|
|00002010| 65 6e 74 20 73 74 72 69 | 6e 67 20 66 72 6f 6d 20 |ent stri|ng from |
|00002020| 74 61 62 6c 65 2e 0d 0a | 6e 43 6f 6c 4e 75 6d 20 |table...|nColNum |
|00002030| 3d 20 2e 50 41 52 45 4e | 54 2e 41 63 74 69 76 65 |= .PAREN|T.Active|
|00002040| 43 6f 6c 75 6d 6e 0d 0a | 63 54 65 6d 70 54 65 78 |Column..|cTempTex|
|00002050| 74 20 3d 20 4c 45 46 54 | 28 63 54 65 6d 70 54 65 |t = LEFT|(cTempTe|
|00002060| 78 74 2c 20 6e 43 6f 6c | 4e 75 6d 20 2d 20 32 29 |xt, nCol|Num - 2)|
|00002070| 20 2b 20 43 48 52 28 6e | 41 73 63 69 69 43 6f 64 | + CHR(n|AsciiCod|
|00002080| 65 29 20 2b 20 49 49 46 | 28 6e 43 6f 6c 4e 75 6d |e) + IIF|(nColNum|
|00002090| 20 3c 20 31 37 2c 20 53 | 55 42 53 54 28 63 54 65 | < 17, S|UBST(cTe|
|000020a0| 6d 70 54 65 78 74 2c 20 | 6e 43 6f 6c 4e 75 6d 29 |mpText, |nColNum)|
|000020b0| 2c 20 22 22 29 0d 0a 52 | 45 50 4c 41 43 45 20 48 |, "")..R|EPLACE H|
|000020c0| 45 58 45 44 49 54 2e 54 | 65 78 74 20 57 49 54 48 |EXEDIT.T|ext WITH|
|000020d0| 20 63 54 65 6d 70 54 65 | 78 74 0d 0a 2e 50 41 52 | cTempTe|xt...PAR|
|000020e0| 45 4e 54 2e 43 4f 4c 55 | 4d 4e 31 38 2e 52 45 46 |ENT.COLU|MN18.REF|
|000020f0| 52 45 53 48 09 09 26 26 | 20 4f 6e 6c 79 20 72 65 |RESH..&&| Only re|
|00002100| 66 72 65 73 68 20 74 68 | 65 20 54 65 78 74 20 63 |fresh th|e Text c|
|00002110| 6f 6c 75 6d 6e 2e 0d 0a | 45 4e 44 57 49 54 48 0d |olumn...|ENDWITH.|
|00002120| 0a 0d 0a 54 48 49 53 46 | 4f 52 4d 2e 4c 6f 63 6b |...THISF|ORM.Lock|
|00002130| 53 63 72 65 65 6e 20 3d | 20 2e 46 2e 0d 0a 45 4e |Screen =| .F...EN|
|00002140| 44 50 52 4f 43 0d 0a 00 | 00 00 01 00 00 00 be 46 |DPROC...|.......F|
|00002150| 6f 6e 74 42 6f 6c 64 20 | 3d 20 2e 46 2e 0d 0a 46 |ontBold |= .F...F|
|00002160| 6f 6e 74 4e 61 6d 65 20 | 3d 20 22 43 6f 75 72 69 |ontName |= "Couri|
|00002170| 65 72 22 0d 0a 46 6f 6e | 74 53 69 7a 65 20 3d 20 |er"..Fon|tSize = |
|00002180| 39 0d 0a 42 6f 72 64 65 | 72 53 74 79 6c 65 20 3d |9..Borde|rStyle =|
|00002190| 20 30 0d 0a 46 6f 72 6d | 61 74 20 3d 20 22 21 21 | 0..Form|at = "!!|
|000021a0| 22 0d 0a 48 65 69 67 68 | 74 20 3d 20 32 35 0d 0a |"..Heigh|t = 25..|
|000021b0| 49 6e 70 75 74 4d 61 73 | 6b 20 3d 20 22 22 0d 0a |InputMas|k = ""..|
|000021c0| 4d 61 72 67 69 6e 20 3d | 20 30 0d 0a 53 70 65 63 |Margin =| 0..Spec|
|000021d0| 69 61 6c 45 66 66 65 63 | 74 20 3d 20 31 0d 0a 57 |ialEffec|t = 1..W|
|000021e0| 69 64 74 68 20 3d 20 32 | 38 0d 0a 68 65 78 69 73 |idth = 2|8..hexis|
|000021f0| 76 61 6c 69 64 20 3d 20 | 2e 54 2e 0d 0a 4e 61 6d |valid = |.T...Nam|
|00002200| 65 20 3d 20 22 74 65 78 | 74 31 22 0d 0a 00 00 00 |e = "tex|t1".....|
|00002210| 01 00 00 00 07 74 65 78 | 74 62 6f 78 00 00 00 01 |.....tex|tbox....|
|00002220| 00 00 00 21 41 72 69 61 | 6c 2c 20 30 2c 20 39 2c |...!Aria|l, 0, 9,|
|00002230| 20 35 2c 20 31 35 2c 20 | 31 32 2c 20 32 31 2c 20 | 5, 15, |12, 21, |
|00002240| 33 2c 20 30 0a 00 00 00 | 01 00 00 00 0d 74 78 74 |3, 0....|.....txt|
|00002250| 66 69 6e 64 73 74 72 69 | 6e 67 00 00 00 01 00 00 |findstri|ng......|
|00002260| 00 06 50 69 78 65 6c 73 | 00 00 00 01 00 00 00 30 |..Pixels|.......0|
|00002270| 54 65 78 74 62 6f 78 20 | 6f 62 6a 65 63 74 20 66 |Textbox |object f|
|00002280| 6f 72 20 44 65 63 69 6d | 61 6c 20 67 72 69 64 20 |or Decim|al grid |
|00002290| 69 6e 20 46 69 6e 64 53 | 74 72 20 66 6f 72 6d 2e |in FindS|tr form.|
|000022a0| 00 00 00 01 00 00 00 05 | 43 6c 61 73 73 00 00 00 |........|Class...|
|000022b0| 01 00 00 00 01 31 00 00 | 00 01 00 00 00 07 74 65 |.....1..|......te|
|000022c0| 78 74 62 6f 78 00 00 00 | 01 00 00 00 0d 74 78 74 |xtbox...|.....txt|
|000022d0| 66 69 6e 64 73 74 72 69 | 6e 67 00 00 00 01 00 00 |findstri|ng......|
|000022e0| 08 d8 fe f2 ff 20 02 01 | 00 00 00 bf 08 00 00 bf |..... ..|........|
|000022f0| 08 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002300| 00 00 00 00 00 00 00 00 | 00 12 4a 03 00 00 00 25 |........|..J....%|
|00002310| 00 00 00 79 07 00 00 00 | 00 00 00 56 08 00 00 4f |...y....|...V...O|
|00002320| 00 00 00 b8 07 00 00 00 | 00 00 00 00 00 00 00 36 |........|.......6|
|00002330| 03 00 03 00 55 00 00 f8 | 00 1a 00 54 f7 00 00 10 |....U...|...T....|
|00002340| fc f4 01 00 f4 02 00 f4 | 02 00 f7 03 00 f8 01 01 |........|........|
|00002350| 08 fd fe 2e 00 25 fc f7 | 00 00 f8 01 00 11 f0 1a |.....%..|........|
|00002360| 00 43 43 43 00 f7 00 00 | f4 04 00 f4 05 00 e5 06 |.CCC....|........|
|00002370| 00 f4 07 00 f7 08 00 9b | ea 5a 09 fd f9 05 f1 00 |........|.Z......|
|00002380| fe 0e 00 54 f4 04 00 f7 | 09 00 10 fc 61 fd fe 1e |...T....|....a...|
|00002390| 00 84 f7 0a 00 10 fc f7 | 00 00 fd 28 fc f8 01 01 |........|...(....|
|000023a0| fd c7 fc f9 02 ff ff fd | f9 05 a0 00 fe 24 00 25 |........|.....$.%|
|000023b0| fc 43 43 43 00 f7 0a 00 | f4 04 00 f4 05 00 e5 06 |.CCC....|........|
|000023c0| 00 f4 07 00 f7 08 00 9b | ea 5a 0a fd f9 05 9c 00 |........|.Z......|
|000023d0| fe 04 00 21 fe 04 00 1e | fe 04 00 85 fe 11 00 25 |...!....|.......%|
|000023e0| fc f7 0a 00 f7 00 00 0f | fd f9 05 df 00 fe 1d 00 |........|........|
|000023f0| 99 f4 01 00 f4 02 00 f4 | 02 00 e5 06 00 fc f7 0a |........|........|
|00002400| 00 f8 01 01 06 fd 03 f7 | 0b 00 fe 0d 00 99 f4 04 |........|........|
|00002410| 00 f4 0c 00 f7 0d 00 fe | 04 00 1e fe 0e 00 54 f4 |........|......T.|
|00002420| 04 00 f7 09 00 10 fc 2d | fd fe 04 00 1e fe 03 00 |.......-|........|
|00002430| 55 0e 00 0f 00 4e 50 52 | 45 56 49 4f 55 53 43 4f |U....NPR|EVIOUSCO|
|00002440| 4c 55 4d 4e 04 00 54 48 | 49 53 06 00 50 41 52 45 |LUMN..TH|IS..PARE|
|00002450| 4e 54 0c 00 41 43 54 49 | 56 45 43 4f 4c 55 4d 4e |NT..ACTI|VECOLUMN|
|00002460| 08 00 54 48 49 53 46 4f | 52 4d 06 00 47 52 44 48 |..THISFO|RM..GRDH|
|00002470| 45 58 07 00 43 4f 4c 55 | 4d 4e 53 05 00 54 45 58 |EX..COLU|MNS..TEX|
|00002480| 54 31 05 00 56 41 4c 55 | 45 0a 00 4c 4f 43 4b 53 |T1..VALU|E..LOCKS|
|00002490| 43 52 45 45 4e 0b 00 4e | 43 55 52 52 45 4e 54 43 |CREEN..N|CURRENTC|
|000024a0| 4f 4c 08 00 53 45 54 46 | 4f 43 55 53 07 00 47 52 |OL..SETF|OCUS..GR|
|000024b0| 44 43 48 41 52 07 00 52 | 45 46 52 45 53 48 1c 01 |DCHAR..R|EFRESH..|
|000024c0| 16 00 54 f7 00 00 10 fc | f4 01 00 f4 02 00 f4 02 |..T.....|........|
|000024d0| 00 f7 03 00 fd fe 19 00 | 54 f7 04 00 10 fc 43 43 |........|T.....CC|
|000024e0| f4 01 00 f7 07 00 1c f4 | 05 00 f6 06 00 fd fe 2b |........|.......+|
|000024f0| 00 3e 16 fc d9 08 00 46 | 69 6e 64 53 74 72 48 fd |.>.....F|indStrH.|
|00002500| fc 43 f7 00 00 d9 08 00 | 46 69 6e 64 53 74 72 48 |.C......|FindStrH|
|00002510| 2f 03 fd d1 fc f7 04 00 | fd fe 0d 00 a6 fc f7 09 |/.......|........|
|00002520| 00 fd f9 05 15 01 fe 1d | 00 54 e2 f4 0a 00 e5 0b |........|.T......|
|00002530| 00 fc f7 00 00 fd 03 f4 | 0c 00 f7 07 00 10 fc f7 |........|........|
|00002540| 04 00 fd fe 14 00 99 e2 | f4 0a 00 e5 0b 00 fc f7 |........|........|
|00002550| 00 00 fd 03 f7 0d 00 fe | 53 00 25 fc 43 43 d9 09 |........|S.%.CC..|
|00002560| 00 46 69 6e 64 53 74 72 | 48 2e 43 f8 01 01 d9 08 |.FindStr|H.C.....|
|00002570| 00 46 69 6e 64 53 74 72 | 48 2f 06 ce d1 0a f0 24 |.FindStr|H/.....$|
|00002580| 00 43 43 d9 09 00 46 69 | 6e 64 53 74 72 48 2e 43 |.CC...Fi|ndStrH.C|
|00002590| f8 01 01 d9 08 00 46 69 | 6e 64 53 74 72 48 2f 06 |......Fi|ndStrH/.|
|000025a0| ce ea 5a 0a 09 fd f9 05 | fa 00 fe 0f 00 54 e2 f4 |..Z.....|.....T..|
|000025b0| 0e 00 f7 0f 00 10 fc 61 | fd fe 08 00 1b f9 05 11 |.......a|........|
|000025c0| 01 fe 0f 00 54 e2 f4 0e | 00 f7 0f 00 10 fc 2d fd |....T...|......-.|
|000025d0| fe 04 00 1e fe 04 00 a7 | fe 03 00 55 10 00 0b 00 |........|...U....|
|000025e0| 4e 43 55 52 52 45 4e 54 | 43 4f 4c 04 00 54 48 49 |NCURRENT|COL..THI|
|000025f0| 53 06 00 50 41 52 45 4e | 54 0c 00 41 43 54 49 56 |S..PAREN|T..ACTIV|
|00002600| 45 43 4f 4c 55 4d 4e 09 | 00 43 54 45 4d 50 54 45 |ECOLUMN.|.CTEMPTE|
|00002610| 58 54 0b 00 54 48 49 53 | 46 4f 52 4d 53 45 54 07 |XT..THIS|FORMSET.|
|00002620| 00 44 45 43 32 48 45 58 | 05 00 56 41 4c 55 45 02 |.DEC2HEX|..VALUE.|
|00002630| 00 49 4e 08 00 54 48 49 | 53 46 4f 52 4d 06 00 47 |.IN..THI|SFORM..G|
|00002640| 52 44 48 45 58 07 00 43 | 4f 4c 55 4d 4e 53 05 00 |RDHEX..C|OLUMNS..|
|00002650| 54 45 58 54 31 07 00 52 | 45 46 52 45 53 48 07 00 |TEXT1..R|EFRESH..|
|00002660| 43 4d 44 46 49 4e 44 07 | 00 45 4e 41 42 4c 45 44 |CMDFIND.|.ENABLED|
|00002670| 54 03 0b 00 af f7 00 00 | 07 f7 01 00 fe 0d 00 18 |T.......|........|
|00002680| 48 f9 05 18 00 f9 05 4d | 03 fe 24 00 0c fc 43 f7 |H......M|..$...C.|
|00002690| 00 00 f8 02 10 f8 03 7e | ab f1 0c 00 43 f7 00 00 |.......~|....C...|
|000026a0| f8 03 81 f8 03 ff ab 0b | fd f9 05 40 00 fe 04 00 |........|...@....|
|000026b0| 42 fe 11 00 0c fc f7 00 | 00 f8 01 01 10 fd f9 05 |B.......|........|
|000026c0| 6e 00 fe 04 00 ac fe 19 | 00 99 f4 02 00 f4 03 00 |n.......|........|
|000026d0| f4 03 00 e5 04 00 fc f8 | 01 01 fd 03 f7 05 00 fe |........|........|
|000026e0| 11 00 0c fc f7 00 00 f8 | 01 06 10 fd f9 05 9c 00 |........|........|
|000026f0| fe 04 00 ac fe 19 00 99 | f4 02 00 f4 03 00 f4 03 |........|........|
|00002700| 00 e5 04 00 fc f8 02 0f | fd 03 f7 05 00 fe 11 00 |........|........|
|00002710| 0c fc f7 00 00 f8 02 0d | 10 fd f9 05 be 00 fe 04 |........|........|
|00002720| 00 ac fe 0d 00 99 f4 06 | 00 f4 07 00 f7 08 00 fe |........|........|
|00002730| 1c 00 0c fc f7 00 00 f8 | 03 7f 10 f1 08 00 f7 00 |........|........|
|00002740| 00 f8 01 07 10 0b fd f9 | 05 db 02 fe 04 00 ac fe |........|........|
|00002750| 16 00 54 f7 09 00 10 fc | f4 02 00 f4 03 00 f4 03 |..T.....|........|
|00002760| 00 f7 0a 00 fd fe 11 00 | 25 fc f7 09 00 f8 02 0f |........|%.......|
|00002770| 0d fd f9 05 6f 01 fe 25 | 00 25 fc 43 43 f7 09 00 |....o..%|.%.CC...|
|00002780| f8 01 01 06 f4 06 00 f4 | 0b 00 e5 04 00 f4 0c 00 |........|........|
|00002790| e0 0d 00 ea 5a 0a fd f9 | 05 6b 01 fe 1c 00 25 fc |....Z...|.k....%.|
|000027a0| f7 09 00 f8 01 01 11 f0 | 08 00 f7 00 00 f8 03 7f |........|........|
|000027b0| 10 09 fd f9 05 63 01 fe | 1d 00 99 f4 02 00 f4 03 |.....c..|........|
|000027c0| 00 f4 03 00 e5 04 00 fc | f7 09 00 f8 01 01 08 fd |........|........|
|000027d0| 03 f7 05 00 fe 04 00 1e | fe 04 00 42 fe 04 00 1e |........|...B....|
|000027e0| fe 04 00 1e fe 10 00 54 | f4 02 00 f7 0d 00 10 fc |.......T|........|
|000027f0| d9 00 00 fd fe 24 00 54 | f7 0e 00 10 fc d9 09 00 |.....$.T|........|
|00002800| 46 69 6e 64 53 74 72 2e | 43 43 43 f7 09 00 f8 01 |FindStr.|CCC.....|
|00002810| 02 f8 01 00 5a 9b 06 fd | fe 10 00 3e fc f7 0e 00 |....Z...|...>....|
|00002820| 03 fd d1 fc d9 00 00 fd | fe 1f 00 54 f4 06 00 f4 |........|...T....|
|00002830| 0b 00 e5 04 00 fc f7 09 | 00 fd 03 f4 0c 00 f7 0d |........|........|
|00002840| 00 10 fc d9 00 00 fd fe | 25 00 54 f7 0e 00 10 fc |........|%.T.....|
|00002850| d9 0a 00 46 69 6e 64 53 | 74 72 48 2e 43 43 43 f7 |...FindS|trH.CCC.|
|00002860| 09 00 f8 01 02 f8 01 00 | 5a 9b 06 fd fe 10 00 3e |........|Z......>|
|00002870| fc f7 0e 00 03 fd d1 fc | d9 00 00 fd fe 1c 00 25 |........|.......%|
|00002880| fc f7 09 00 f8 01 01 11 | f0 08 00 f7 00 00 f8 03 |........|........|
|00002890| 7f 10 09 fd f9 05 44 02 | fe 1d 00 99 f4 02 00 f4 |......D.|........|
|000028a0| 03 00 f4 03 00 e5 04 00 | fc f7 09 00 f8 01 01 08 |........|........|
|000028b0| fd 03 f7 05 00 fe 08 00 | 1b f9 05 cd 02 fe 53 00 |........|......S.|
|000028c0| 25 fc 43 43 d9 09 00 46 | 69 6e 64 53 74 72 48 2e |%.CC...F|indStrH.|
|000028d0| 43 f8 01 01 d9 08 00 46 | 69 6e 64 53 74 72 48 2f |C......F|indStrH/|
|000028e0| 06 ce d1 0a f0 24 00 43 | 43 d9 09 00 46 69 6e 64 |.....$.C|C...Find|
|000028f0| 53 74 72 48 2e 43 f8 01 | 01 d9 08 00 46 69 6e 64 |StrH.C..|....Find|
|00002900| 53 74 72 48 2f 06 ce ea | 5a 0a 09 fd f9 05 b0 02 |StrH/...|Z.......|
|00002910| fe 11 00 54 f4 06 00 f4 | 07 00 f7 0f 00 10 fc 61 |...T....|.......a|
|00002920| fd fe 08 00 1b f9 05 c9 | 02 fe 11 00 54 f4 06 00 |........|....T...|
|00002930| f4 07 00 f7 0f 00 10 fc | 2d fd fe 04 00 1e fe 04 |........|-.......|
|00002940| 00 1e fe 0a 00 99 f4 06 | 00 f7 10 00 fe 11 00 0c |........|........|
|00002950| fc f7 00 00 f8 01 09 10 | fd f9 05 2b 03 fe 04 00 |........|...+....|
|00002960| ac fe 0e 00 54 f4 06 00 | f7 11 00 10 fc 61 fd fe |....T...|.....a..|
|00002970| 1f 00 99 f4 06 00 f4 0b | 00 e5 04 00 fc f4 02 00 |........|........|
|00002980| f4 03 00 f4 03 00 f7 0a | 00 fd 03 f7 05 00 fe 0e |........|........|
|00002990| 00 54 f4 06 00 f7 11 00 | 10 fc 2d fd fe 11 00 0c |.T......|..-.....|
|000029a0| fc f7 00 00 f8 02 0f 10 | fd f9 05 4d 03 fe 04 00 |........|...M....|
|000029b0| ac fe 0d 00 99 f4 06 00 | f4 12 00 f7 05 00 fe 04 |........|........|
|000029c0| 00 1c fe 03 00 55 13 00 | 08 00 4e 4b 45 59 43 4f |.....U..|..NKEYCO|
|000029d0| 44 45 0d 00 4e 53 48 49 | 46 54 41 4c 54 43 54 52 |DE..NSHI|FTALTCTR|
|000029e0| 4c 04 00 54 48 49 53 06 | 00 50 41 52 45 4e 54 07 |L..THIS.|.PARENT.|
|000029f0| 00 43 4f 4c 55 4d 4e 53 | 08 00 53 45 54 46 4f 43 |.COLUMNS|..SETFOC|
|00002a00| 55 53 08 00 54 48 49 53 | 46 4f 52 4d 07 00 43 4d |US..THIS|FORM..CM|
|00002a10| 44 46 49 4e 44 05 00 43 | 4c 49 43 4b 0d 00 4e 41 |DFIND..C|LICK..NA|
|00002a20| 43 54 49 56 45 43 4f 4c | 55 4d 4e 0c 00 41 43 54 |CTIVECOL|UMN..ACT|
|00002a30| 49 56 45 43 4f 4c 55 4d | 4e 06 00 47 52 44 48 45 |IVECOLUM|N..GRDHE|
|00002a40| 58 05 00 54 45 58 54 31 | 05 00 56 41 4c 55 45 0a |X..TEXT1|..VALUE.|
|00002a50| 00 43 46 49 45 4c 44 4e | 41 4d 45 07 00 45 4e 41 |.CFIELDN|AME..ENA|
|00002a60| 42 4c 45 44 07 00 52 45 | 46 52 45 53 48 0a 00 4c |BLED..RE|FRESH..L|
|00002a70| 4f 43 4b 53 43 52 45 45 | 4e 09 00 43 4d 44 43 41 |OCKSCREE|N..CMDCA|
|00002a80| 4e 43 45 4c 08 00 47 6f | 74 46 6f 63 75 73 2c 00 |NCEL..Go|tFocus,.|
|00002a90| 00 00 00 00 ff ff 11 00 | 49 6e 74 65 72 61 63 74 |........|Interact|
|00002aa0| 69 76 65 43 68 61 6e 67 | 65 b3 01 00 00 00 00 ff |iveChang|e.......|
|00002ab0| ff 08 00 4b 65 79 50 72 | 65 73 73 65 03 00 00 00 |...KeyPr|esse....|
|00002ac0| 00 ff ff 31 00 a3 01 e1 | 02 e1 00 e1 01 41 02 41 |...1....|.....A.A|
|00002ad0| 00 41 00 41 00 11 01 d1 | 01 d1 00 41 00 e2 00 41 |.A.A....|...A...A|
|00002ae0| 00 32 00 63 01 91 01 b1 | 02 d2 00 d2 01 41 01 34 |.2.c....|.....A.4|
|00002af0| 05 f1 00 81 00 f1 00 41 | 00 41 00 34 00 b1 00 d3 |.......A|.A.4....|
|00002b00| 00 41 02 41 00 11 01 41 | 00 91 01 11 01 41 00 91 |.A.A...A|.....A..|
|00002b10| 01 11 01 41 00 d1 00 c1 | 01 41 00 61 01 11 01 51 |...A....|.A.a...Q|
|00002b20| 02 c2 01 d1 01 41 00 41 | 00 41 00 41 00 02 01 41 |.....A.A|.A.A...A|
|00002b30| 02 01 01 f1 01 51 02 01 | 01 c1 01 d1 01 81 00 33 |.....Q..|.......3|
|00002b40| 05 11 01 81 00 11 01 41 | 00 41 00 a1 00 11 01 43 |.......A|.A.....C|
|00002b50| 00 e1 00 f1 01 e1 00 11 | 01 41 00 d1 00 41 00 32 |........|.A...A.2|
|00002b60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002b70| 00 01 00 00 00 14 00 00 | 00 ac 02 00 00 01 00 00 |........|........|
|00002b80| 00 10 00 00 00 d4 02 00 | 00 53 05 00 00 14 00 00 |........|.S......|
|00002b90| 00 1d 00 00 00 72 05 00 | 00 5d 0d 00 00 2b 00 00 |.....r..|.]...+..|
|00002ba0| 00 00 29 00 00 00 bf 08 | 00 00 00 00 00 00 00 00 |..).....|........|
|00002bb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 01 00 00 |........|........|
|00002bc0| 0d 68 50 52 4f 43 45 44 | 55 52 45 20 47 6f 74 46 |.hPROCED|URE GotF|
|00002bd0| 6f 63 75 73 0d 0a 2a 2a | 20 54 6f 20 6d 61 6b 65 |ocus..**| To make|
|00002be0| 20 67 72 69 64 20 61 63 | 74 20 6d 6f 72 65 20 6c | grid ac|t more l|
|00002bf0| 69 6b 65 20 74 65 78 74 | 62 6f 78 2c 20 6d 61 6b |ike text|box, mak|
|00002c00| 65 20 66 6f 63 75 73 20 | 6d 6f 76 65 20 74 6f 20 |e focus |move to |
|00002c10| 63 65 6c 6c 20 6a 75 73 | 74 20 61 66 74 65 72 20 |cell jus|t after |
|00002c20| 6c 61 73 74 0d 0a 2a 2a | 20 6e 6f 6e 2d 62 6c 61 |last..**| non-bla|
|00002c30| 6e 6b 20 63 65 6c 6c 20 | 69 66 20 75 73 65 72 20 |nk cell |if user |
|00002c40| 63 6c 69 63 6b 73 20 74 | 6f 20 74 68 65 20 72 69 |clicks t|o the ri|
|00002c50| 67 68 74 20 6f 66 20 6e | 6f 6e 2d 62 6c 61 6e 6b |ght of n|on-blank|
|00002c60| 20 63 65 6c 6c 73 0d 0a | 6e 50 72 65 76 69 6f 75 | cells..|nPreviou|
|00002c70| 73 43 6f 6c 75 6d 6e 20 | 3d 20 54 48 49 53 2e 50 |sColumn |= THIS.P|
|00002c80| 41 52 45 4e 54 2e 50 41 | 52 45 4e 54 2e 41 63 74 |ARENT.PA|RENT.Act|
|00002c90| 69 76 65 43 6f 6c 75 6d | 6e 20 2d 20 31 0d 0a 49 |iveColum|n - 1..I|
|00002ca0| 46 20 6e 50 72 65 76 69 | 6f 75 73 43 6f 6c 75 6d |F nPrevi|ousColum|
|00002cb0| 6e 20 3e 20 30 20 41 4e | 44 20 49 53 42 4c 41 4e |n > 0 AN|D ISBLAN|
|00002cc0| 4b 28 41 4c 4c 54 52 49 | 4d 28 54 48 49 53 46 4f |K(ALLTRI|M(THISFO|
|00002cd0| 52 4d 2e 67 72 64 48 65 | 78 2e 43 4f 4c 55 4d 4e |RM.grdHe|x.COLUMN|
|00002ce0| 53 28 6e 50 72 65 76 69 | 6f 75 73 43 6f 6c 75 6d |S(nPrevi|ousColum|
|00002cf0| 6e 29 2e 54 65 78 74 31 | 2e 56 41 4c 55 45 29 29 |n).Text1|.VALUE))|
|00002d00| 0d 0a 09 54 48 49 53 46 | 4f 52 4d 2e 4c 4f 43 4b |...THISF|ORM.LOCK|
|00002d10| 53 43 52 45 45 4e 20 3d | 20 2e 54 2e 0d 0a 09 46 |SCREEN =| .T....F|
|00002d20| 4f 52 20 6e 43 75 72 72 | 65 6e 74 43 6f 6c 20 3d |OR nCurr|entCol =|
|00002d30| 20 6e 50 72 65 76 69 6f | 75 73 43 6f 6c 75 6d 6e | nPrevio|usColumn|
|00002d40| 20 74 6f 20 31 20 53 54 | 45 50 20 2d 31 0d 0a 09 | to 1 ST|EP -1...|
|00002d50| 09 49 46 20 21 49 53 42 | 4c 41 4e 4b 28 41 4c 4c |.IF !ISB|LANK(ALL|
|00002d60| 54 52 49 4d 28 54 48 49 | 53 46 4f 52 4d 2e 67 72 |TRIM(THI|SFORM.gr|
|00002d70| 64 48 65 78 2e 43 4f 4c | 55 4d 4e 53 28 6e 43 75 |dHex.COL|UMNS(nCu|
|00002d80| 72 72 65 6e 74 43 6f 6c | 29 2e 54 65 78 74 31 2e |rrentCol|).Text1.|
|00002d90| 56 41 4c 55 45 29 29 0d | 0a 09 09 09 45 58 49 54 |VALUE)).|....EXIT|
|00002da0| 0d 0a 09 09 45 4e 44 49 | 46 0d 0a 09 4e 45 58 54 |....ENDI|F...NEXT|
|00002db0| 0d 0a 09 49 46 20 6e 43 | 75 72 72 65 6e 74 43 6f |...IF nC|urrentCo|
|00002dc0| 6c 20 21 3d 20 6e 50 72 | 65 76 69 6f 75 73 43 6f |l != nPr|eviousCo|
|00002dd0| 6c 75 6d 6e 09 09 26 26 | 20 44 69 64 20 77 65 20 |lumn..&&| Did we |
|00002de0| 68 61 76 65 20 74 6f 20 | 6d 6f 76 65 3f 0d 0a 09 |have to |move?...|
|00002df0| 09 54 48 49 53 2e 50 41 | 52 45 4e 54 2e 50 41 52 |.THIS.PA|RENT.PAR|
|00002e00| 45 4e 54 2e 43 4f 4c 55 | 4d 4e 53 28 6e 43 75 72 |ENT.COLU|MNS(nCur|
|00002e10| 72 65 6e 74 43 6f 6c 20 | 2b 20 31 29 2e 53 45 54 |rentCol |+ 1).SET|
|00002e20| 46 4f 43 55 53 0d 0a 09 | 09 54 48 49 53 46 4f 52 |FOCUS...|.THISFOR|
|00002e30| 4d 2e 67 72 64 43 68 61 | 72 2e 52 45 46 52 45 53 |M.grdCha|r.REFRES|
|00002e40| 48 0d 0a 09 45 4e 44 49 | 46 0d 0a 0d 0a 09 54 48 |H...ENDI|F.....TH|
|00002e50| 49 53 46 4f 52 4d 2e 4c | 4f 43 4b 53 43 52 45 45 |ISFORM.L|OCKSCREE|
|00002e60| 4e 20 3d 20 2e 46 2e 0d | 0a 45 4e 44 49 46 0d 0a |N = .F..|.ENDIF..|
|00002e70| 45 4e 44 50 52 4f 43 0d | 0a 50 52 4f 43 45 44 55 |ENDPROC.|.PROCEDU|
|00002e80| 52 45 20 49 6e 74 65 72 | 61 63 74 69 76 65 43 68 |RE Inter|activeCh|
|00002e90| 61 6e 67 65 0d 0a 2a 2a | 20 43 75 72 72 65 6e 74 |ange..**| Current|
|00002ea0| 20 63 65 6c 6c 20 68 61 | 73 20 62 65 65 6e 20 65 | cell ha|s been e|
|00002eb0| 64 69 74 65 64 2e 20 20 | 54 72 61 6e 73 6c 61 74 |dited.  |Translat|
|00002ec0| 65 2c 20 61 6e 64 20 75 | 70 64 61 74 65 20 74 68 |e, and u|pdate th|
|00002ed0| 65 20 48 65 78 20 67 72 | 69 64 2e 0d 0a 0d 0a 6e |e Hex gr|id.....n|
|00002ee0| 43 75 72 72 65 6e 74 43 | 6f 6c 20 3d 20 54 48 49 |CurrentC|ol = THI|
|00002ef0| 53 2e 50 41 52 45 4e 54 | 2e 50 41 52 45 4e 54 2e |S.PARENT|.PARENT.|
|00002f00| 41 63 74 69 76 65 43 6f | 6c 75 6d 6e 0d 0a 63 54 |ActiveCo|lumn..cT|
|00002f10| 65 6d 70 54 65 78 74 20 | 3d 20 54 48 49 53 46 4f |empText |= THISFO|
|00002f20| 52 4d 53 45 54 2e 44 45 | 43 32 48 45 58 28 41 53 |RMSET.DE|C2HEX(AS|
|00002f30| 43 28 54 48 49 53 2e 56 | 41 4c 55 45 29 29 0d 0a |C(THIS.V|ALUE))..|
|00002f40| 52 45 50 4c 41 43 45 20 | 28 46 49 45 4c 44 28 6e |REPLACE |(FIELD(n|
|00002f50| 43 75 72 72 65 6e 74 43 | 6f 6c 2c 20 22 46 69 6e |CurrentC|ol, "Fin|
|00002f60| 64 53 74 72 48 22 29 29 | 20 57 49 54 48 20 63 54 |dStrH"))| WITH cT|
|00002f70| 65 6d 70 54 65 78 74 20 | 49 4e 20 22 46 69 6e 64 |empText |IN "Find|
|00002f80| 53 74 72 48 22 0d 0a 0d | 0a 57 49 54 48 20 54 48 |StrH"...|.WITH TH|
|00002f90| 49 53 46 4f 52 4d 0d 0a | 09 2a 20 20 55 70 64 61 |ISFORM..|.*  Upda|
|00002fa0| 74 65 20 74 68 65 20 48 | 65 78 20 67 72 69 64 2e |te the H|ex grid.|
|00002fb0| 0d 0a 09 2e 67 72 64 48 | 65 78 2e 43 6f 6c 75 6d |....grdH|ex.Colum|
|00002fc0| 6e 73 28 6e 43 75 72 72 | 65 6e 74 43 6f 6c 29 2e |ns(nCurr|entCol).|
|00002fd0| 54 65 78 74 31 2e 56 61 | 6c 75 65 20 3d 20 63 54 |Text1.Va|lue = cT|
|00002fe0| 65 6d 70 54 65 78 74 0d | 0a 09 2e 67 72 64 48 65 |empText.|...grdHe|
|00002ff0| 78 2e 43 6f 6c 75 6d 6e | 73 28 6e 43 75 72 72 65 |x.Column|s(nCurre|
|00003000| 6e 74 43 6f 6c 29 2e 52 | 45 46 52 45 53 48 0d 0a |ntCol).R|EFRESH..|
|00003010| 09 0d 0a 09 2a 20 20 49 | 66 20 74 68 65 72 65 20 |....*  I|f there |
|00003020| 69 73 20 73 6f 6d 65 74 | 68 69 6e 67 20 74 6f 20 |is somet|hing to |
|00003030| 73 65 61 72 63 68 20 66 | 6f 72 2c 20 65 6e 61 62 |search f|or, enab|
|00003040| 6c 65 20 74 68 65 20 46 | 69 6e 64 20 62 75 74 74 |le the F|ind butt|
|00003050| 6f 6e 2e 0d 0a 09 49 46 | 20 21 49 53 4e 55 4c 4c |on....IF| !ISNULL|
|00003060| 28 45 56 41 4c 28 22 46 | 69 6e 64 53 74 72 48 2e |(EVAL("F|indStrH.|
|00003070| 22 20 2b 20 46 49 45 4c | 44 28 31 2c 22 46 69 6e |" + FIEL|D(1,"Fin|
|00003080| 64 53 74 72 48 22 29 29 | 29 20 3b 0d 0a 09 09 41 |dStrH"))|) ;....A|
|00003090| 4e 44 20 21 49 53 42 4c | 41 4e 4b 28 45 56 41 4c |ND !ISBL|ANK(EVAL|
|000030a0| 28 22 46 69 6e 64 53 74 | 72 48 2e 22 20 2b 20 46 |("FindSt|rH." + F|
|000030b0| 49 45 4c 44 28 31 2c 20 | 22 46 69 6e 64 53 74 72 |IELD(1, |"FindStr|
|000030c0| 48 22 29 29 29 0d 0a 09 | 09 2e 63 6d 64 46 69 6e |H")))...|..cmdFin|
|000030d0| 64 2e 45 6e 61 62 6c 65 | 64 20 3d 20 2e 54 2e 0d |d.Enable|d = .T..|
|000030e0| 0a 09 45 4c 53 45 0d 0a | 09 09 2e 63 6d 64 46 69 |..ELSE..|...cmdFi|
|000030f0| 6e 64 2e 45 6e 61 62 6c | 65 64 20 3d 20 2e 46 2e |nd.Enabl|ed = .F.|
|00003100| 0d 0a 09 45 4e 44 49 46 | 0d 0a 45 4e 44 57 49 54 |...ENDIF|..ENDWIT|
|00003110| 48 0d 0a 0d 0a 0d 0a 45 | 4e 44 50 52 4f 43 0d 0a |H......E|NDPROC..|
|00003120| 50 52 4f 43 45 44 55 52 | 45 20 4b 65 79 50 72 65 |PROCEDUR|E KeyPre|
|00003130| 73 73 0d 0a 4c 50 41 52 | 41 4d 45 54 45 52 53 20 |ss..LPAR|AMETERS |
|00003140| 6e 4b 65 79 43 6f 64 65 | 2c 20 6e 53 68 69 66 74 |nKeyCode|, nShift|
|00003150| 41 6c 74 43 74 72 6c 0d | 0a 0d 0a 2a 2a 20 48 61 |AltCtrl.|...** Ha|
|00003160| 6e 64 6c 65 20 63 65 72 | 74 61 69 6e 20 6b 65 79 |ndle cer|tain key|
|00003170| 73 74 72 6f 6b 65 73 2c | 20 74 6f 20 6d 61 6b 65 |strokes,| to make|
|00003180| 20 67 72 69 64 20 61 63 | 74 20 6d 6f 72 65 20 6c | grid ac|t more l|
|00003190| 69 6b 65 20 61 20 74 65 | 78 74 62 6f 78 2e 0d 0a |ike a te|xtbox...|
|000031a0| 44 4f 20 43 41 53 45 0d | 0a 43 41 53 45 20 42 45 |DO CASE.|.CASE BE|
|000031b0| 54 57 45 45 4e 28 6e 4b | 65 79 43 6f 64 65 2c 20 |TWEEN(nK|eyCode, |
|000031c0| 31 36 2c 20 31 32 36 29 | 20 4f 52 20 42 45 54 57 |16, 126)| OR BETW|
|000031d0| 45 45 4e 28 6e 4b 65 79 | 43 6f 64 65 2c 31 32 39 |EEN(nKey|Code,129|
|000031e0| 2c 32 35 35 29 0d 0a 09 | 52 45 54 55 52 4e 09 26 |,255)...|RETURN.&|
|000031f0| 26 20 52 65 74 75 72 6e | 20 69 6d 6d 65 64 69 61 |& Return| immedia|
|00003200| 74 65 6c 79 20 69 66 20 | 74 79 70 69 63 61 6c 20 |tely if |typical |
|00003210| 6b 65 79 73 74 72 6f 6b | 65 2e 0d 0a 43 41 53 45 |keystrok|e...CASE|
|00003220| 20 6e 4b 65 79 43 6f 64 | 65 20 3d 20 31 09 26 26 | nKeyCod|e = 1.&&|
|00003230| 20 48 6f 6d 65 0d 0a 09 | 4e 4f 44 45 46 41 55 4c | Home...|NODEFAUL|
|00003240| 54 0d 0a 09 54 48 49 53 | 2e 50 41 52 45 4e 54 2e |T...THIS|.PARENT.|
|00003250| 50 41 52 45 4e 54 2e 43 | 6f 6c 75 6d 6e 73 28 31 |PARENT.C|olumns(1|
|00003260| 29 2e 53 45 54 46 4f 43 | 55 53 0d 0a 43 41 53 45 |).SETFOC|US..CASE|
|00003270| 20 6e 4b 65 79 43 6f 64 | 65 20 3d 20 36 09 26 26 | nKeyCod|e = 6.&&|
|00003280| 20 45 6e 64 0d 0a 09 4e | 4f 44 45 46 41 55 4c 54 | End...N|ODEFAULT|
|00003290| 0d 0a 09 54 48 49 53 2e | 50 41 52 45 4e 54 2e 50 |...THIS.|PARENT.P|
|000032a0| 41 52 45 4e 54 2e 43 6f | 6c 75 6d 6e 73 28 31 35 |ARENT.Co|lumns(15|
|000032b0| 29 2e 53 45 54 46 4f 43 | 55 53 0d 0a 43 41 53 45 |).SETFOC|US..CASE|
|000032c0| 20 6e 4b 65 79 43 6f 64 | 65 20 3d 20 31 33 09 26 | nKeyCod|e = 13.&|
|000032d0| 26 20 52 65 74 75 72 6e | 0d 0a 09 4e 4f 44 45 46 |& Return|...NODEF|
|000032e0| 41 55 4c 54 0d 0a 09 54 | 48 49 53 46 4f 52 4d 2e |AULT...T|HISFORM.|
|000032f0| 63 6d 64 46 69 6e 64 2e | 43 6c 69 63 6b 0d 0a 43 |cmdFind.|Click..C|
|00003300| 41 53 45 20 6e 4b 65 79 | 43 6f 64 65 20 3d 20 31 |ASE nKey|Code = 1|
|00003310| 32 37 09 4f 52 20 6e 4b | 65 79 43 6f 64 65 20 3d |27.OR nK|eyCode =|
|00003320| 20 37 09 26 26 20 42 61 | 63 6b 73 70 61 63 65 0d | 7.&& Ba|ckspace.|
|00003330| 0a 09 4e 4f 44 45 46 41 | 55 4c 54 0d 0a 09 6e 41 |..NODEFA|ULT...nA|
|00003340| 63 74 69 76 65 43 6f 6c | 75 6d 6e 20 3d 20 54 48 |ctiveCol|umn = TH|
|00003350| 49 53 2e 50 41 52 45 4e | 54 2e 50 41 52 45 4e 54 |IS.PAREN|T.PARENT|
|00003360| 2e 41 63 74 69 76 65 43 | 6f 6c 75 6d 6e 0d 0a 09 |.ActiveC|olumn...|
|00003370| 49 46 20 6e 41 63 74 69 | 76 65 43 6f 6c 75 6d 6e |IF nActi|veColumn|
|00003380| 20 3c 20 31 35 0d 0a 09 | 09 49 46 20 21 49 53 42 | < 15...|.IF !ISB|
|00003390| 4c 41 4e 4b 28 54 48 49 | 53 46 4f 52 4d 2e 67 72 |LANK(THI|SFORM.gr|
|000033a0| 64 48 65 78 2e 43 6f 6c | 75 6d 6e 73 28 6e 41 63 |dHex.Col|umns(nAc|
|000033b0| 74 69 76 65 43 6f 6c 75 | 6d 6e 20 2b 20 31 29 2e |tiveColu|mn + 1).|
|000033c0| 54 65 78 74 31 2e 56 61 | 6c 75 65 29 0d 0a 09 09 |Text1.Va|lue)....|
|000033d0| 09 2a 2a 20 43 65 6c 6c | 20 74 6f 20 72 69 67 68 |.** Cell| to righ|
|000033e0| 74 20 69 73 6e 27 74 20 | 62 6c 61 6e 6b 2e 20 20 |t isn't |blank.  |
|000033f0| 4a 75 73 74 20 6d 6f 76 | 65 20 70 6f 69 6e 74 65 |Just mov|e pointe|
|00003400| 72 2e 0d 0a 09 09 09 49 | 46 20 6e 41 63 74 69 76 |r......I|F nActiv|
|00003410| 65 43 6f 6c 75 6d 6e 20 | 3e 20 31 20 41 4e 44 20 |eColumn |> 1 AND |
|00003420| 6e 4b 65 79 43 6f 64 65 | 20 3d 20 31 32 37 0d 0a |nKeyCode| = 127..|
|00003430| 09 09 09 09 54 48 49 53 | 2e 50 41 52 45 4e 54 2e |....THIS|.PARENT.|
|00003440| 50 41 52 45 4e 54 2e 43 | 6f 6c 75 6d 6e 73 28 6e |PARENT.C|olumns(n|
|00003450| 41 63 74 69 76 65 43 6f | 6c 75 6d 6e 20 2d 20 31 |ActiveCo|lumn - 1|
|00003460| 29 2e 53 45 54 46 4f 43 | 55 53 0d 0a 09 09 09 45 |).SETFOC|US.....E|
|00003470| 4e 44 49 46 0d 0a 09 09 | 09 52 45 54 55 52 4e 0d |NDIF....|.RETURN.|
|00003480| 0a 09 09 45 4e 44 49 46 | 0d 0a 09 45 4e 44 49 46 |...ENDIF|...ENDIF|
|00003490| 0d 0a 09 2a 2a 20 49 66 | 20 77 65 20 6d 61 64 65 |...** If| we made|
|000034a0| 20 69 74 20 68 65 72 65 | 2c 20 77 65 20 63 61 6e | it here|, we can|
|000034b0| 20 64 65 6c 65 74 65 20 | 61 6e 64 20 6d 6f 76 65 | delete |and move|
|000034c0| 20 66 72 65 65 6c 79 2e | 0d 0a 09 54 48 49 53 2e | freely.|...THIS.|
|000034d0| 56 41 4c 55 45 20 3d 20 | 22 22 09 09 09 26 26 20 |VALUE = |""...&& |
|000034e0| 73 69 6e 63 65 20 77 65 | 20 69 73 73 75 65 20 4e |since we| issue N|
|000034f0| 4f 44 45 46 41 55 4c 54 | 2c 20 74 68 65 20 76 61 |ODEFAULT|, the va|
|00003500| 6c 75 65 20 69 73 20 6e | 6f 74 20 73 74 6f 72 65 |lue is n|ot store|
|00003510| 64 20 61 73 20 77 65 20 | 6c 6f 73 65 20 66 6f 63 |d as we |lose foc|
|00003520| 75 73 2e 0d 0a 09 63 46 | 69 65 6c 64 4e 61 6d 65 |us....cF|ieldName|
|00003530| 20 3d 20 22 46 69 6e 64 | 53 74 72 2e 43 22 20 2b | = "Find|Str.C" +|
|00003540| 20 41 4c 4c 54 52 49 4d | 28 53 54 52 28 6e 41 63 | ALLTRIM|(STR(nAc|
|00003550| 74 69 76 65 43 6f 6c 75 | 6d 6e 2c 32 2c 30 29 29 |tiveColu|mn,2,0))|
|00003560| 0d 0a 09 52 45 50 4c 41 | 43 45 20 28 63 46 69 65 |...REPLA|CE (cFie|
|00003570| 6c 64 4e 61 6d 65 29 20 | 57 49 54 48 20 22 22 09 |ldName) |WITH "".|
|00003580| 09 26 26 20 44 6f 20 69 | 74 20 6d 61 6e 75 61 6c |.&& Do i|t manual|
|00003590| 6c 79 2e 0d 0a 09 54 48 | 49 53 46 4f 52 4d 2e 67 |ly....TH|ISFORM.g|
|000035a0| 72 64 48 65 78 2e 43 6f | 6c 75 6d 6e 73 28 6e 41 |rdHex.Co|lumns(nA|
|000035b0| 63 74 69 76 65 43 6f 6c | 75 6d 6e 29 2e 54 65 78 |ctiveCol|umn).Tex|
|000035c0| 74 31 2e 56 61 6c 75 65 | 20 3d 20 22 22 0d 0a 09 |t1.Value| = ""...|
|000035d0| 63 46 69 65 6c 64 4e 61 | 6d 65 20 3d 20 22 46 69 |cFieldNa|me = "Fi|
|000035e0| 6e 64 53 74 72 48 2e 43 | 22 20 2b 20 41 4c 4c 54 |ndStrH.C|" + ALLT|
|000035f0| 52 49 4d 28 53 54 52 28 | 6e 41 63 74 69 76 65 43 |RIM(STR(|nActiveC|
|00003600| 6f 6c 75 6d 6e 2c 32 2c | 30 29 29 0d 0a 09 52 45 |olumn,2,|0))...RE|
|00003610| 50 4c 41 43 45 20 28 63 | 46 69 65 6c 64 4e 61 6d |PLACE (c|FieldNam|
|00003620| 65 29 20 57 49 54 48 20 | 22 22 0d 0a 09 49 46 20 |e) WITH |""...IF |
|00003630| 6e 41 63 74 69 76 65 43 | 6f 6c 75 6d 6e 20 3e 20 |nActiveC|olumn > |
|00003640| 31 20 41 4e 44 20 6e 4b | 65 79 43 6f 64 65 20 3d |1 AND nK|eyCode =|
|00003650| 20 31 32 37 0d 0a 09 09 | 54 48 49 53 2e 50 41 52 | 127....|THIS.PAR|
|00003660| 45 4e 54 2e 50 41 52 45 | 4e 54 2e 43 6f 6c 75 6d |ENT.PARE|NT.Colum|
|00003670| 6e 73 28 6e 41 63 74 69 | 76 65 43 6f 6c 75 6d 6e |ns(nActi|veColumn|
|00003680| 20 2d 20 31 29 2e 53 45 | 54 46 4f 43 55 53 0d 0a | - 1).SE|TFOCUS..|
|00003690| 09 45 4c 53 45 0d 0a 09 | 09 2a 20 20 49 66 20 74 |.ELSE...|.*  If t|
|000036a0| 68 65 72 65 20 69 73 20 | 6e 6f 74 68 69 6e 67 20 |here is |nothing |
|000036b0| 74 6f 20 73 65 61 72 63 | 68 20 66 6f 72 2c 20 64 |to searc|h for, d|
|000036c0| 69 73 61 62 6c 65 20 74 | 68 65 20 46 69 6e 64 20 |isable t|he Find |
|000036d0| 62 75 74 74 6f 6e 2e 0d | 0a 09 09 49 46 20 21 49 |button..|...IF !I|
|000036e0| 53 4e 55 4c 4c 28 45 56 | 41 4c 28 22 46 69 6e 64 |SNULL(EV|AL("Find|
|000036f0| 53 74 72 48 2e 22 20 2b | 20 46 49 45 4c 44 28 31 |StrH." +| FIELD(1|
|00003700| 2c 22 46 69 6e 64 53 74 | 72 48 22 29 29 29 20 3b |,"FindSt|rH"))) ;|
|00003710| 0d 0a 09 09 09 41 4e 44 | 20 21 49 53 42 4c 41 4e |.....AND| !ISBLAN|
|00003720| 4b 28 45 56 41 4c 28 22 | 46 69 6e 64 53 74 72 48 |K(EVAL("|FindStrH|
|00003730| 2e 22 20 2b 20 46 49 45 | 4c 44 28 31 2c 20 22 46 |." + FIE|LD(1, "F|
|00003740| 69 6e 64 53 74 72 48 22 | 29 29 29 0d 0a 09 09 09 |indStrH"|))).....|
|00003750| 54 48 49 53 46 4f 52 4d | 2e 63 6d 64 46 69 6e 64 |THISFORM|.cmdFind|
|00003760| 2e 45 6e 61 62 6c 65 64 | 20 3d 20 2e 54 2e 0d 0a |.Enabled| = .T...|
|00003770| 09 09 45 4c 53 45 0d 0a | 09 09 09 54 48 49 53 46 |..ELSE..|...THISF|
|00003780| 4f 52 4d 2e 63 6d 64 46 | 69 6e 64 2e 45 6e 61 62 |ORM.cmdF|ind.Enab|
|00003790| 6c 65 64 20 3d 20 2e 46 | 2e 0d 0a 09 09 45 4e 44 |led = .F|.....END|
|000037a0| 49 46 0d 0a 09 45 4e 44 | 49 46 0d 0a 09 54 48 49 |IF...END|IF...THI|
|000037b0| 53 46 4f 52 4d 2e 52 45 | 46 52 45 53 48 0d 0a 43 |SFORM.RE|FRESH..C|
|000037c0| 41 53 45 20 6e 4b 65 79 | 43 6f 64 65 20 3d 20 39 |ASE nKey|Code = 9|
|000037d0| 20 09 09 26 26 20 54 61 | 62 0d 0a 09 2a 2a 20 44 | ..&& Ta|b...** D|
|000037e0| 65 66 61 75 6c 74 20 66 | 6f 72 20 74 68 65 20 67 |efault f|or the g|
|000037f0| 72 69 64 20 69 73 20 74 | 6f 20 6d 6f 76 65 20 74 |rid is t|o move t|
|00003800| 6f 20 6e 65 78 74 20 66 | 69 65 6c 64 20 69 6e 20 |o next f|ield in |
|00003810| 67 72 69 64 2e 20 20 4e | 65 65 64 73 20 74 6f 20 |grid.  N|eeds to |
|00003820| 6d 6f 76 65 20 66 6f 63 | 75 73 20 74 6f 0d 0a 09 |move foc|us to...|
|00003830| 2a 2a 20 6e 65 78 74 20 | 63 6f 6e 74 72 6f 6c 2e |** next |control.|
|00003840| 0d 0a 09 4e 4f 44 45 46 | 41 55 4c 54 0d 0a 09 54 |...NODEF|AULT...T|
|00003850| 48 49 53 46 4f 52 4d 2e | 4c 6f 63 6b 73 63 72 65 |HISFORM.|Lockscre|
|00003860| 65 6e 20 3d 20 2e 54 2e | 0d 0a 09 54 48 49 53 46 |en = .T.|...THISF|
|00003870| 4f 52 4d 2e 67 72 64 48 | 65 78 2e 43 6f 6c 75 6d |ORM.grdH|ex.Colum|
|00003880| 6e 73 28 54 68 69 73 2e | 70 61 72 65 6e 74 2e 70 |ns(This.|parent.p|
|00003890| 61 72 65 6e 74 2e 41 63 | 74 69 76 65 43 6f 6c 75 |arent.Ac|tiveColu|
|000038a0| 6d 6e 29 2e 53 45 54 46 | 4f 43 55 53 0d 0a 09 54 |mn).SETF|OCUS...T|
|000038b0| 48 49 53 46 4f 52 4d 2e | 4c 6f 63 6b 73 63 72 65 |HISFORM.|Lockscre|
|000038c0| 65 6e 20 3d 20 2e 46 2e | 0d 0a 43 41 53 45 20 6e |en = .F.|..CASE n|
|000038d0| 4b 65 79 43 6f 64 65 20 | 3d 20 31 35 09 09 26 26 |KeyCode |= 15..&&|
|000038e0| 20 53 68 69 66 74 54 61 | 62 2e 0d 0a 09 4e 4f 44 | ShiftTa|b....NOD|
|000038f0| 45 46 41 55 4c 54 0d 0a | 09 54 48 49 53 46 4f 52 |EFAULT..|.THISFOR|
|00003900| 4d 2e 63 6d 64 43 61 6e | 63 65 6c 2e 53 45 54 46 |M.cmdCan|cel.SETF|
|00003910| 4f 43 55 53 0d 0a 45 4e | 44 43 41 53 45 0d 0a 0d |OCUS..EN|DCASE...|
|00003920| 0a 45 4e 44 50 52 4f 43 | 0d 0a 00 00 00 01 00 00 |.ENDPROC|........|
|00003930| 00 73 42 6f 72 64 65 72 | 53 74 79 6c 65 20 3d 20 |.sBorder|Style = |
|00003940| 30 0d 0a 48 65 69 67 68 | 74 20 3d 20 32 31 0d 0a |0..Heigh|t = 21..|
|00003950| 49 6e 70 75 74 4d 61 73 | 6b 20 3d 20 22 58 22 0d |InputMas|k = "X".|
|00003960| 0a 4d 61 72 67 69 6e 20 | 3d 20 30 0d 0a 53 70 65 |.Margin |= 0..Spe|
|00003970| 63 69 61 6c 45 66 66 65 | 63 74 20 3d 20 31 0d 0a |cialEffe|ct = 1..|
|00003980| 57 69 64 74 68 20 3d 20 | 31 30 30 0d 0a 4e 61 6d |Width = |100..Nam|
|00003990| 65 20 3d 20 22 74 78 74 | 66 69 6e 64 73 74 72 69 |e = "txt|findstri|
|000039a0| 6e 67 22 0d 0a 00 00 00 | 01 00 00 00 07 74 65 78 |ng".....|.....tex|
|000039b0| 74 62 6f 78 00 00 00 01 | 00 00 00 22 43 6f 75 72 |tbox....|..."Cour|
|000039c0| 69 65 72 2c 20 30 2c 20 | 38 2c 20 39 2c 20 31 36 |ier, 0, |8, 9, 16|
|000039d0| 2c 20 31 33 2c 20 39 2c | 20 33 2c 20 30 0a 00 00 |, 13, 9,| 3, 0...|
|000039e0| 00 01 00 00 00 10 74 78 | 74 66 69 6e 64 73 74 72 |......tx|tfindstr|
|000039f0| 69 6e 67 68 65 78 00 00 | 00 01 00 00 00 06 50 69 |inghex..|......Pi|
|00003a00| 78 65 6c 73 00 00 00 01 | 00 00 00 2c 54 65 78 74 |xels....|...,Text|
|00003a10| 62 6f 78 20 6f 62 6a 65 | 63 74 20 66 6f 72 20 48 |box obje|ct for H|
|00003a20| 65 78 20 67 72 69 64 20 | 69 6e 20 46 69 6e 64 53 |ex grid |in FindS|
|00003a30| 74 72 20 66 6f 72 6d 2e | 00 00 00 01 00 00 00 05 |tr form.|........|
|00003a40| 43 6c 61 73 73 00 00 00 | 01 00 00 00 01 31 00 00 |Class...|.....1..|
|00003a50| 00 01 00 00 00 07 74 65 | 78 74 62 6f 78 00 00 00 |......te|xtbox...|
|00003a60| 01 00 00 00 10 74 78 74 | 66 69 6e 64 73 74 72 69 |.....txt|findstri|
|00003a70| 6e 67 68 65 78 00 00 00 | 01 00 00 09 5e fe f2 ff |nghex...|....^...|
|00003a80| 20 02 01 00 00 00 45 09 | 00 00 45 09 00 00 00 00 | .....E.|..E.....|
|00003a90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00003aa0| 00 00 00 00 f7 05 03 00 | 00 00 25 00 00 00 ed 07 |........|..%.....|
|00003ab0| 00 00 00 00 00 00 dc 08 | 00 00 58 00 00 00 2c 08 |........|..X...,.|
|00003ac0| 00 00 00 00 00 00 00 00 | 00 00 36 03 00 03 00 55 |........|..6....U|
|00003ad0| 00 00 9b 03 0b 00 af f7 | 00 00 07 f7 01 00 fe 0d |........|........|
|00003ae0| 00 18 48 f9 05 18 00 f9 | 05 94 03 fe 24 00 0c fc |..H.....|....$...|
|00003af0| 43 f7 00 00 f8 02 1f f8 | 03 7e ab f1 0c 00 43 f7 |C.......|.~....C.|
|00003b00| 00 00 f8 03 81 f8 03 ff | ab 0b fd f9 05 81 00 fe |........|........|
|00003b10| 2b 00 25 fc 43 f7 00 00 | 20 d9 16 00 31 32 33 34 |+.%.C...| ...1234|
|00003b20| 35 36 37 38 39 30 61 62 | 63 64 65 66 41 42 43 44 |567890ab|cdefABCD|
|00003b30| 45 46 01 03 0a fd f9 05 | 79 00 fe 0e 00 03 f8 03 |EF......|y.......|
|00003b40| 01 fc 43 f8 01 07 20 fd | fe 04 00 ac fe 04 00 1e |..C... .|........|
|00003b50| fe 04 00 42 fe 11 00 0c | fc f7 00 00 f8 01 01 10 |...B....|........|
|00003b60| fd f9 05 af 00 fe 04 00 | ac fe 19 00 99 f4 02 00 |........|........|
|00003b70| f4 03 00 f4 03 00 e5 04 | 00 fc f8 01 01 fd 03 f7 |........|........|
|00003b80| 05 00 fe 11 00 0c fc f7 | 00 00 f8 01 06 10 fd f9 |........|........|
|00003b90| 05 dd 00 fe 04 00 ac fe | 19 00 99 f4 02 00 f4 03 |........|........|
|00003ba0| 00 f4 03 00 e5 04 00 fc | f8 02 0f fd 03 f7 05 00 |........|........|
|00003bb0| fe 11 00 0c fc f7 00 00 | f8 02 0d 10 fd f9 05 ff |........|........|
|00003bc0| 00 fe 04 00 ac fe 0d 00 | 99 f4 06 00 f4 07 00 f7 |........|........|
|00003bd0| 08 00 fe 1c 00 0c fc f7 | 00 00 f8 03 7f 10 f1 08 |........|........|
|00003be0| 00 f7 00 00 f8 01 07 10 | 0b fd f9 05 1f 03 fe 04 |........|........|
|00003bf0| 00 ac fe 16 00 54 f7 09 | 00 10 fc f4 02 00 f4 03 |.....T..|........|
|00003c00| 00 f4 03 00 f7 0a 00 fd | fe 11 00 25 fc f7 09 00 |........|...%....|
|00003c10| f8 02 0f 0d fd f9 05 b3 | 01 fe 28 00 25 fc 43 43 |........|..(.%.CC|
|00003c20| f7 09 00 f8 01 01 06 f4 | 02 00 f4 03 00 f4 03 00 |........|........|
|00003c30| e5 04 00 f4 0b 00 e0 0c | 00 ea 5a 0a fd f9 05 af |........|..Z.....|
|00003c40| 01 fe 1c 00 25 fc f7 09 | 00 f8 01 01 11 f0 08 00 |....%...|........|
|00003c50| f7 00 00 f8 03 7f 10 09 | fd f9 05 a7 01 fe 1d 00 |........|........|
|00003c60| 99 f4 02 00 f4 03 00 f4 | 03 00 e5 04 00 fc f7 09 |........|........|
|00003c70| 00 f8 01 01 08 fd 03 f7 | 05 00 fe 04 00 1e fe 04 |........|........|
|00003c80| 00 42 fe 04 00 1e fe 04 | 00 1e fe 10 00 54 f4 02 |.B......|.....T..|
|00003c90| 00 f7 0c 00 10 fc d9 00 | 00 fd fe 24 00 54 f7 0d |........|...$.T..|
|00003ca0| 00 10 fc d9 09 00 46 69 | 6e 64 53 74 72 2e 43 43 |......Fi|ndStr.CC|
|00003cb0| 43 f7 09 00 f8 01 02 f8 | 01 00 5a 9b 06 fd fe 10 |C.......|..Z.....|
|00003cc0| 00 3e fc f7 0d 00 03 fd | d1 fc d9 00 00 fd fe 1f |.>......|........|
|00003cd0| 00 54 f4 06 00 f4 0e 00 | e5 04 00 fc f7 09 00 fd |.T......|........|
|00003ce0| 03 f4 0b 00 f7 0c 00 10 | fc d9 00 00 fd fe 25 00 |........|......%.|
|00003cf0| 54 f7 0d 00 10 fc d9 0a | 00 46 69 6e 64 53 74 72 |T.......|.FindStr|
|00003d00| 48 2e 43 43 43 f7 09 00 | f8 01 02 f8 01 00 5a 9b |H.CCC...|......Z.|
|00003d10| 06 fd fe 10 00 3e fc f7 | 0d 00 03 fd d1 fc d9 00 |.....>..|........|
|00003d20| 00 fd fe 1c 00 25 fc f7 | 09 00 f8 01 01 11 f0 08 |.....%..|........|
|00003d30| 00 f7 00 00 f8 03 7f 10 | 09 fd f9 05 88 02 fe 1d |........|........|
|00003d40| 00 99 f4 02 00 f4 03 00 | f4 03 00 e5 04 00 fc f7 |........|........|
|00003d50| 09 00 f8 01 01 08 fd 03 | f7 05 00 fe 08 00 1b f9 |........|........|
|00003d60| 05 11 03 fe 53 00 25 fc | 43 43 d9 09 00 46 69 6e |....S.%.|CC...Fin|
|00003d70| 64 53 74 72 48 2e 43 f8 | 01 01 d9 08 00 46 69 6e |dStrH.C.|.....Fin|
|00003d80| 64 53 74 72 48 2f 06 ce | d1 0a f0 24 00 43 43 d9 |dStrH/..|...$.CC.|
|00003d90| 09 00 46 69 6e 64 53 74 | 72 48 2e 43 f8 01 01 d9 |..FindSt|rH.C....|
|00003da0| 08 00 46 69 6e 64 53 74 | 72 48 2f 06 ce ea 5a 0a |..FindSt|rH/...Z.|
|00003db0| 09 fd f9 05 f4 02 fe 11 | 00 54 f4 06 00 f4 07 00 |........|.T......|
|00003dc0| f7 0f 00 10 fc 61 fd fe | 08 00 1b f9 05 0d 03 fe |.....a..|........|
|00003dd0| 11 00 54 f4 06 00 f4 07 | 00 f7 0f 00 10 fc 2d fd |..T.....|......-.|
|00003de0| fe 04 00 1e fe 04 00 1e | fe 0a 00 99 f4 06 00 f7 |........|........|
|00003df0| 10 00 fe 11 00 0c fc f7 | 00 00 f8 01 09 10 fd f9 |........|........|
|00003e00| 05 44 03 fe 04 00 ac fe | 10 00 99 f4 06 00 f4 11 |.D......|........|
|00003e10| 00 f4 12 00 f7 05 00 fe | 11 00 0c fc f7 00 00 f8 |........|........|
|00003e20| 02 0f 10 fd f9 05 94 03 | fe 04 00 ac fe 0e 00 54 |........|.......T|
|00003e30| f4 06 00 f7 13 00 10 fc | 61 fd fe 1f 00 99 f4 06 |........|a.......|
|00003e40| 00 f4 14 00 e5 04 00 fc | f4 02 00 f4 03 00 f4 03 |........|........|
|00003e50| 00 f7 0a 00 fd 03 f7 05 | 00 fe 0e 00 54 f4 06 00 |........|....T...|
|00003e60| f7 13 00 10 fc 2d fd fe | 04 00 1c fe 03 00 55 15 |.....-..|......U.|
|00003e70| 00 08 00 4e 4b 45 59 43 | 4f 44 45 0d 00 4e 53 48 |...NKEYC|ODE..NSH|
|00003e80| 49 46 54 41 4c 54 43 54 | 52 4c 04 00 54 48 49 53 |IFTALTCT|RL..THIS|
|00003e90| 06 00 50 41 52 45 4e 54 | 07 00 43 4f 4c 55 4d 4e |..PARENT|..COLUMN|
|00003ea0| 53 08 00 53 45 54 46 4f | 43 55 53 08 00 54 48 49 |S..SETFO|CUS..THI|
|00003eb0| 53 46 4f 52 4d 07 00 43 | 4d 44 46 49 4e 44 05 00 |SFORM..C|MDFIND..|
|00003ec0| 43 4c 49 43 4b 0d 00 4e | 41 43 54 49 56 45 43 4f |CLICK..N|ACTIVECO|
|00003ed0| 4c 55 4d 4e 0c 00 41 43 | 54 49 56 45 43 4f 4c 55 |LUMN..AC|TIVECOLU|
|00003ee0| 4d 4e 05 00 54 45 58 54 | 31 05 00 56 41 4c 55 45 |MN..TEXT|1..VALUE|
|00003ef0| 0a 00 43 46 49 45 4c 44 | 4e 41 4d 45 06 00 47 52 |..CFIELD|NAME..GR|
|00003f00| 44 48 45 58 07 00 45 4e | 41 42 4c 45 44 07 00 52 |DHEX..EN|ABLED..R|
|00003f10| 45 46 52 45 53 48 12 00 | 4f 50 54 53 45 41 52 43 |EFRESH..|OPTSEARC|
|00003f20| 48 44 49 52 45 43 54 49 | 4f 4e 07 00 4f 50 54 49 |HDIRECTI|ON..OPTI|
|00003f30| 4f 4e 31 0a 00 4c 4f 43 | 4b 53 43 52 45 45 4e 07 |ON1..LOC|KSCREEN.|
|00003f40| 00 47 52 44 43 48 41 52 | f0 00 13 00 a6 fc f4 00 |.GRDCHAR|........|
|00003f50| 00 f4 01 00 f7 01 00 fd | f9 05 e9 00 fe 12 00 54 |........|.......T|
|00003f60| f7 02 00 10 fc e2 f7 03 | 00 f8 01 01 08 fd fe 29 |........|.......)|
|00003f70| 00 25 fc f7 02 00 f8 01 | 00 11 f0 15 00 43 43 43 |.%......|.....CCC|
|00003f80| 00 f7 02 00 e2 e5 04 00 | f4 05 00 f7 06 00 9b ea |........|........|
|00003f90| 5a 09 fd f9 05 e5 00 fe | 0e 00 54 f4 07 00 f7 08 |Z.......|..T.....|
|00003fa0| 00 10 fc 61 fd fe 1e 00 | 84 f7 09 00 10 fc f7 02 |...a....|........|
|00003fb0| 00 fd 28 fc f8 01 01 fd | c7 fc f9 02 ff ff fd f9 |..(.....|........|
|00003fc0| 05 a1 00 fe 1f 00 25 fc | 43 43 43 00 f7 09 00 e2 |......%.|CCC.....|
|00003fd0| e5 04 00 f4 05 00 f7 06 | 00 9b ea 5a 0a fd f9 05 |........|...Z....|
|00003fe0| 9d 00 fe 04 00 21 fe 04 | 00 1e fe 04 00 85 fe 11 |.....!..|........|
|00003ff0| 00 25 fc f7 09 00 f7 02 | 00 0f fd f9 05 d3 00 fe |.%......|........|
|00004000| 15 00 99 e2 e5 04 00 fc | f7 09 00 f8 01 01 06 fd |........|........|
|00004010| 03 f7 0a 00 fe 08 00 99 | e2 f7 0b 00 fe 04 00 1e |........|........|
|00004020| fe 0e 00 54 f4 07 00 f7 | 08 00 10 fc 2d fd fe 04 |...T....|....-...|
|00004030| 00 1e fe 04 00 a7 fe 03 | 00 55 0c 00 04 00 54 48 |........|.U....TH|
|00004040| 49 53 06 00 50 41 52 45 | 4e 54 0f 00 4e 50 52 45 |IS..PARE|NT..NPRE|
|00004050| 56 49 4f 55 53 43 4f 4c | 55 4d 4e 0c 00 41 43 54 |VIOUSCOL|UMN..ACT|
|00004060| 49 56 45 43 4f 4c 55 4d | 4e 07 00 43 4f 4c 55 4d |IVECOLUM|N..COLUM|
|00004070| 4e 53 05 00 54 45 58 54 | 31 05 00 56 41 4c 55 45 |NS..TEXT|1..VALUE|
|00004080| 08 00 54 48 49 53 46 4f | 52 4d 0a 00 4c 4f 43 4b |..THISFO|RM..LOCK|
|00004090| 53 43 52 45 45 4e 0b 00 | 4e 43 55 52 52 45 4e 54 |SCREEN..|NCURRENT|
|000040a0| 43 4f 4c 08 00 53 45 54 | 46 4f 43 55 53 07 00 52 |COL..SET|FOCUS..R|
|000040b0| 45 46 52 45 53 48 4d 01 | 16 00 54 f7 00 00 10 fc |EFRESHM.|..T.....|
|000040c0| f4 01 00 f4 02 00 f4 02 | 00 f7 03 00 fd fe 10 00 |........|........|
|000040d0| 54 f7 04 00 10 fc f4 01 | 00 f7 05 00 fd fe 1a 00 |T.......|........|
|000040e0| 25 fc 43 18 f7 04 00 ea | 5a f1 06 00 43 f7 04 00 |%.C.....|Z...C...|
|000040f0| d1 0b fd f9 05 69 00 fe | 29 00 3e 16 fc d9 07 00 |.....i..|).>.....|
|00004100| 46 69 6e 64 53 74 72 fd | fc 43 f7 00 00 d9 07 00 |FindStr.|.C......|
|00004110| 46 69 6e 64 53 74 72 2f | 03 fd d1 fc d9 00 00 fd |FindStr/|........|
|00004120| fe 08 00 1b f9 05 a4 00 | fe 33 00 3e 16 fc d9 07 |........|.3.>....|
|00004130| 00 46 69 6e 64 53 74 72 | fd fc 43 f7 00 00 d9 07 |.FindStr|..C.....|
|00004140| 00 46 69 6e 64 53 74 72 | 2f 03 fd d1 fc 43 43 00 |.FindStr|/....CC.|
|00004150| f7 04 00 f4 07 00 f6 08 | 00 20 fd fe 04 00 1e fe |........|. ......|
|00004160| 0d 00 a6 fc f7 09 00 fd | f9 05 46 01 fe 14 00 99 |........|..F.....|
|00004170| e2 f4 0a 00 e5 0b 00 fc | f7 00 00 fd 03 f7 0c 00 |........|........|
|00004180| fe 53 00 25 fc 43 43 d9 | 09 00 46 69 6e 64 53 74 |.S.%.CC.|..FindSt|
|00004190| 72 48 2e 43 f8 01 01 d9 | 08 00 46 69 6e 64 53 74 |rH.C....|..FindSt|
|000041a0| 72 48 2f 06 ce d1 0a f0 | 24 00 43 43 d9 09 00 46 |rH/.....|$.CC...F|
|000041b0| 69 6e 64 53 74 72 48 2e | 43 f8 01 01 d9 08 00 46 |indStrH.|C......F|
|000041c0| 69 6e 64 53 74 72 48 2f | 06 ce ea 5a 0a 09 fd f9 |indStrH/|...Z....|
|000041d0| 05 2b 01 fe 0f 00 54 e2 | f4 0d 00 f7 0e 00 10 fc |.+....T.|........|
|000041e0| 61 fd fe 08 00 1b f9 05 | 42 01 fe 0f 00 54 e2 f4 |a.......|B....T..|
|000041f0| 0d 00 f7 0e 00 10 fc 2d | fd fe 04 00 1e fe 04 00 |.......-|........|
|00004200| a7 fe 03 00 55 0f 00 0b | 00 4e 43 55 52 52 45 4e |....U...|.NCURREN|
|00004210| 54 43 4f 4c 04 00 54 48 | 49 53 06 00 50 41 52 45 |TCOL..TH|IS..PARE|
|00004220| 4e 54 0c 00 41 43 54 49 | 56 45 43 4f 4c 55 4d 4e |NT..ACTI|VECOLUMN|
|00004230| 09 00 43 54 45 4d 50 54 | 45 58 54 05 00 56 41 4c |..CTEMPT|EXT..VAL|
|00004240| 55 45 02 00 49 4e 0b 00 | 54 48 49 53 46 4f 52 4d |UE..IN..|THISFORM|
|00004250| 53 45 54 07 00 48 45 58 | 32 44 45 43 08 00 54 48 |SET..HEX|2DEC..TH|
|00004260| 49 53 46 4f 52 4d 07 00 | 47 52 44 43 48 41 52 07 |ISFORM..|GRDCHAR.|
|00004270| 00 43 4f 4c 55 4d 4e 53 | 07 00 52 45 46 52 45 53 |.COLUMNS|..REFRES|
|00004280| 48 07 00 43 4d 44 46 49 | 4e 44 07 00 45 4e 41 42 |H..CMDFI|ND..ENAB|
|00004290| 4c 45 44 08 00 4b 65 79 | 50 72 65 73 73 2c 00 00 |LED..Key|Press,..|
|000042a0| 00 00 00 ff ff 08 00 47 | 6f 74 46 6f 63 75 73 a2 |.......G|otFocus.|
|000042b0| 04 00 00 00 00 ff ff 11 | 00 49 6e 74 65 72 61 63 |........|.Interac|
|000042c0| 74 69 76 65 43 68 61 6e | 67 65 10 06 00 00 00 00 |tiveChan|ge......|
|000042d0| ff ff 31 00 b1 00 d4 00 | 41 02 b1 02 e1 00 41 00 |..1.....|A.....A.|
|000042e0| 41 00 41 00 11 01 41 00 | 91 01 11 01 41 00 91 01 |A.A...A.|....A...|
|000042f0| 11 01 41 00 d1 00 c1 01 | 41 00 61 01 11 01 81 02 |..A.....|A.a.....|
|00004300| c2 01 d1 01 41 00 41 00 | 41 00 41 00 02 01 41 02 |....A.A.|A.A...A.|
|00004310| 01 01 f1 01 51 02 01 01 | c1 01 d1 01 81 00 33 05 |....Q...|......3.|
|00004320| 11 01 81 00 11 01 41 00 | 41 00 a1 00 11 01 43 00 |......A.|A.....C.|
|00004330| 01 01 11 01 41 00 e1 00 | f1 01 e1 00 41 00 33 00 |....A...|....A.3.|
|00004340| 33 01 21 01 91 02 e1 00 | e1 01 f1 01 41 00 41 00 |3.!.....|....A.A.|
|00004350| 41 00 11 01 51 01 81 00 | 41 00 e1 00 41 00 41 00 |A...Q...|A...A.A.|
|00004360| 33 00 62 01 01 01 a2 01 | 91 02 81 00 31 03 41 00 |3.b.....|....1.A.|
|00004370| d2 00 43 01 34 05 f1 00 | 81 00 f1 00 41 00 41 00 |..C.4...|....A.A.|
|00004380| 35 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |5.......|........|
|00004390| 00 00 01 00 00 00 14 00 | 00 00 74 08 00 00 01 00 |........|..t.....|
|000043a0| 00 00 37 00 00 00 93 08 | 00 00 fb 0a 00 00 42 00 |..7.....|......B.|
|000043b0| 00 00 48 00 00 00 23 0b | 00 00 4b 0e 00 00 57 00 |..H...#.|..K...W.|
|000043c0| 00 00 00 29 00 00 00 45 | 09 00 00 00 00 00 00 00 |...)...E|........|
|000043d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|000043e0| 00 0e 56 50 52 4f 43 45 | 44 55 52 45 20 4b 65 79 |..VPROCE|DURE Key|
|000043f0| 50 72 65 73 73 0d 0a 4c | 50 41 52 41 4d 45 54 45 |Press..L|PARAMETE|
|00004400| 52 53 20 6e 4b 65 79 43 | 6f 64 65 2c 20 6e 53 68 |RS nKeyC|ode, nSh|
|00004410| 69 66 74 41 6c 74 43 74 | 72 6c 0d 0a 2a 20 20 42 |iftAltCt|rl..*  B|
|00004420| 79 70 61 73 73 20 74 68 | 65 20 67 72 69 64 20 63 |ypass th|e grid c|
|00004430| 65 6c 6c 27 73 20 64 65 | 66 61 75 6c 74 20 6b 65 |ell's de|fault ke|
|00004440| 79 73 74 72 6f 6b 65 73 | 2e 0d 0a 0d 0a 2a 4d 75 |ystrokes|.....*Mu|
|00004450| 73 74 20 62 65 20 6e 75 | 6d 65 72 69 63 20 6f 72 |st be nu|meric or|
|00004460| 20 69 6e 20 22 41 42 43 | 44 45 46 22 0d 0a 44 4f | in "ABC|DEF"..DO|
|00004470| 20 43 41 53 45 0d 0a 43 | 41 53 45 20 42 45 54 57 | CASE..C|ASE BETW|
|00004480| 45 45 4e 28 6e 4b 65 79 | 43 6f 64 65 2c 20 33 31 |EEN(nKey|Code, 31|
|00004490| 2c 20 31 32 36 29 20 4f | 52 20 42 45 54 57 45 45 |, 126) O|R BETWEE|
|000044a0| 4e 28 6e 4b 65 79 43 6f | 64 65 2c 31 32 39 2c 32 |N(nKeyCo|de,129,2|
|000044b0| 35 35 29 09 26 26 20 50 | 72 69 6e 74 61 62 6c 65 |55).&& P|rintable|
|000044c0| 20 6c 65 74 74 65 72 73 | 0d 0a 09 49 46 20 21 28 | letters|...IF !(|
|000044d0| 43 48 52 28 6e 4b 65 79 | 43 6f 64 65 29 24 22 31 |CHR(nKey|Code)$"1|
|000044e0| 32 33 34 35 36 37 38 39 | 30 61 62 63 64 65 66 41 |23456789|0abcdefA|
|000044f0| 42 43 44 45 46 22 29 09 | 09 26 26 20 4f 6e 6c 79 |BCDEF").|.&& Only|
|00004500| 20 61 6c 6c 6f 77 20 48 | 65 78 20 64 69 67 69 74 | allow H|ex digit|
|00004510| 73 0d 0a 09 09 3f 3f 20 | 43 48 52 28 37 29 09 09 |s....?? |CHR(7)..|
|00004520| 0d 0a 09 09 4e 4f 44 45 | 46 41 55 4c 54 0d 0a 09 |....NODE|FAULT...|
|00004530| 45 4e 44 49 46 0d 0a 09 | 52 45 54 55 52 4e 0d 0a |ENDIF...|RETURN..|
|00004540| 43 41 53 45 20 6e 4b 65 | 79 43 6f 64 65 20 3d 20 |CASE nKe|yCode = |
|00004550| 31 09 26 26 20 48 6f 6d | 65 0d 0a 09 4e 4f 44 45 |1.&& Hom|e...NODE|
|00004560| 46 41 55 4c 54 0d 0a 09 | 54 48 49 53 2e 50 41 52 |FAULT...|THIS.PAR|
|00004570| 45 4e 54 2e 50 41 52 45 | 4e 54 2e 43 6f 6c 75 6d |ENT.PARE|NT.Colum|
|00004580| 6e 73 28 31 29 2e 53 45 | 54 46 4f 43 55 53 0d 0a |ns(1).SE|TFOCUS..|
|00004590| 43 41 53 45 20 6e 4b 65 | 79 43 6f 64 65 20 3d 20 |CASE nKe|yCode = |
|000045a0| 36 09 26 26 20 45 6e 64 | 0d 0a 09 4e 4f 44 45 46 |6.&& End|...NODEF|
|000045b0| 41 55 4c 54 0d 0a 09 54 | 48 49 53 2e 50 41 52 45 |AULT...T|HIS.PARE|
|000045c0| 4e 54 2e 50 41 52 45 4e | 54 2e 43 6f 6c 75 6d 6e |NT.PAREN|T.Column|
|000045d0| 73 28 31 35 29 2e 53 45 | 54 46 4f 43 55 53 0d 0a |s(15).SE|TFOCUS..|
|000045e0| 43 41 53 45 20 6e 4b 65 | 79 43 6f 64 65 20 3d 20 |CASE nKe|yCode = |
|000045f0| 31 33 09 26 26 20 52 65 | 74 75 72 6e 0d 0a 09 4e |13.&& Re|turn...N|
|00004600| 4f 44 45 46 41 55 4c 54 | 0d 0a 09 54 48 49 53 46 |ODEFAULT|...THISF|
|00004610| 4f 52 4d 2e 63 6d 64 46 | 69 6e 64 2e 43 6c 69 63 |ORM.cmdF|ind.Clic|
|00004620| 6b 0d 0a 43 41 53 45 20 | 6e 4b 65 79 43 6f 64 65 |k..CASE |nKeyCode|
|00004630| 20 3d 20 31 32 37 09 4f | 52 20 6e 4b 65 79 43 6f | = 127.O|R nKeyCo|
|00004640| 64 65 20 3d 20 37 26 26 | 20 42 61 63 6b 73 70 61 |de = 7&&| Backspa|
|00004650| 63 65 0d 0a 09 4e 4f 44 | 45 46 41 55 4c 54 0d 0a |ce...NOD|EFAULT..|
|00004660| 09 6e 41 63 74 69 76 65 | 43 6f 6c 75 6d 6e 20 3d |.nActive|Column =|
|00004670| 20 54 48 49 53 2e 50 41 | 52 45 4e 54 2e 50 41 52 | THIS.PA|RENT.PAR|
|00004680| 45 4e 54 2e 41 63 74 69 | 76 65 43 6f 6c 75 6d 6e |ENT.Acti|veColumn|
|00004690| 0d 0a 09 49 46 20 6e 41 | 63 74 69 76 65 43 6f 6c |...IF nA|ctiveCol|
|000046a0| 75 6d 6e 20 3c 20 31 35 | 0d 0a 09 09 49 46 20 21 |umn < 15|....IF !|
|000046b0| 49 53 42 4c 41 4e 4b 28 | 54 48 49 53 2e 50 41 52 |ISBLANK(|THIS.PAR|
|000046c0| 45 4e 54 2e 50 41 52 45 | 4e 54 2e 43 6f 6c 75 6d |ENT.PARE|NT.Colum|
|000046d0| 6e 73 28 6e 41 63 74 69 | 76 65 43 6f 6c 75 6d 6e |ns(nActi|veColumn|
|000046e0| 20 2b 20 31 29 2e 54 65 | 78 74 31 2e 56 61 6c 75 | + 1).Te|xt1.Valu|
|000046f0| 65 29 0d 0a 09 09 09 2a | 2a 20 43 65 6c 6c 20 74 |e).....*|* Cell t|
|00004700| 6f 20 72 69 67 68 74 20 | 69 73 6e 27 74 20 62 6c |o right |isn't bl|
|00004710| 61 6e 6b 2e 20 20 4a 75 | 73 74 20 6d 6f 76 65 20 |ank.  Ju|st move |
|00004720| 70 6f 69 6e 74 65 72 2e | 0d 0a 09 09 09 49 46 20 |pointer.|.....IF |
|00004730| 6e 41 63 74 69 76 65 43 | 6f 6c 75 6d 6e 20 3e 20 |nActiveC|olumn > |
|00004740| 31 20 41 4e 44 20 6e 4b | 65 79 43 6f 64 65 20 3d |1 AND nK|eyCode =|
|00004750| 20 31 32 37 0d 0a 09 09 | 09 09 54 48 49 53 2e 50 | 127....|..THIS.P|
|00004760| 41 52 45 4e 54 2e 50 41 | 52 45 4e 54 2e 43 6f 6c |ARENT.PA|RENT.Col|
|00004770| 75 6d 6e 73 28 6e 41 63 | 74 69 76 65 43 6f 6c 75 |umns(nAc|tiveColu|
|00004780| 6d 6e 20 2d 20 31 29 2e | 53 45 54 46 4f 43 55 53 |mn - 1).|SETFOCUS|
|00004790| 0d 0a 09 09 09 45 4e 44 | 49 46 0d 0a 09 09 09 52 |.....END|IF.....R|
|000047a0| 45 54 55 52 4e 0d 0a 09 | 09 45 4e 44 49 46 0d 0a |ETURN...|.ENDIF..|
|000047b0| 09 45 4e 44 49 46 0d 0a | 09 2a 2a 20 49 66 20 77 |.ENDIF..|.** If w|
|000047c0| 65 20 6d 61 64 65 20 69 | 74 20 68 65 72 65 2c 20 |e made i|t here, |
|000047d0| 77 65 20 63 61 6e 20 64 | 65 6c 65 74 65 20 61 6e |we can d|elete an|
|000047e0| 64 20 6d 6f 76 65 20 66 | 72 65 65 6c 79 2e 0d 0a |d move f|reely...|
|000047f0| 09 54 48 49 53 2e 56 41 | 4c 55 45 20 3d 20 22 22 |.THIS.VA|LUE = ""|
|00004800| 09 09 09 26 26 20 73 69 | 6e 63 65 20 77 65 20 69 |...&& si|nce we i|
|00004810| 73 73 75 65 20 4e 4f 44 | 45 46 41 55 4c 54 2c 20 |ssue NOD|EFAULT, |
|00004820| 74 68 65 20 76 61 6c 75 | 65 20 69 73 20 6e 6f 74 |the valu|e is not|
|00004830| 20 73 74 6f 72 65 64 20 | 61 73 20 77 65 20 6c 6f | stored |as we lo|
|00004840| 73 65 20 66 6f 63 75 73 | 2e 0d 0a 09 63 46 69 65 |se focus|....cFie|
|00004850| 6c 64 4e 61 6d 65 20 3d | 20 22 46 69 6e 64 53 74 |ldName =| "FindSt|
|00004860| 72 2e 43 22 20 2b 20 41 | 4c 4c 54 52 49 4d 28 53 |r.C" + A|LLTRIM(S|
|00004870| 54 52 28 6e 41 63 74 69 | 76 65 43 6f 6c 75 6d 6e |TR(nActi|veColumn|
|00004880| 2c 32 2c 30 29 29 0d 0a | 09 52 45 50 4c 41 43 45 |,2,0))..|.REPLACE|
|00004890| 20 28 63 46 69 65 6c 64 | 4e 61 6d 65 29 20 57 49 | (cField|Name) WI|
|000048a0| 54 48 20 22 22 09 09 26 | 26 20 44 6f 20 69 74 20 |TH ""..&|& Do it |
|000048b0| 6d 61 6e 75 61 6c 6c 79 | 2e 0d 0a 09 54 48 49 53 |manually|....THIS|
|000048c0| 46 4f 52 4d 2e 67 72 64 | 48 65 78 2e 43 6f 6c 75 |FORM.grd|Hex.Colu|
|000048d0| 6d 6e 73 28 6e 41 63 74 | 69 76 65 43 6f 6c 75 6d |mns(nAct|iveColum|
|000048e0| 6e 29 2e 54 65 78 74 31 | 2e 56 61 6c 75 65 20 3d |n).Text1|.Value =|
|000048f0| 20 22 22 0d 0a 09 63 46 | 69 65 6c 64 4e 61 6d 65 | ""...cF|ieldName|
|00004900| 20 3d 20 22 46 69 6e 64 | 53 74 72 48 2e 43 22 20 | = "Find|StrH.C" |
|00004910| 2b 20 41 4c 4c 54 52 49 | 4d 28 53 54 52 28 6e 41 |+ ALLTRI|M(STR(nA|
|00004920| 63 74 69 76 65 43 6f 6c | 75 6d 6e 2c 32 2c 30 29 |ctiveCol|umn,2,0)|
|00004930| 29 0d 0a 09 52 45 50 4c | 41 43 45 20 28 63 46 69 |)...REPL|ACE (cFi|
|00004940| 65 6c 64 4e 61 6d 65 29 | 20 57 49 54 48 20 22 22 |eldName)| WITH ""|
|00004950| 0d 0a 09 49 46 20 6e 41 | 63 74 69 76 65 43 6f 6c |...IF nA|ctiveCol|
|00004960| 75 6d 6e 20 3e 20 31 20 | 41 4e 44 20 6e 4b 65 79 |umn > 1 |AND nKey|
|00004970| 43 6f 64 65 20 3d 20 31 | 32 37 0d 0a 09 09 54 48 |Code = 1|27....TH|
|00004980| 49 53 2e 50 41 52 45 4e | 54 2e 50 41 52 45 4e 54 |IS.PAREN|T.PARENT|
|00004990| 2e 43 6f 6c 75 6d 6e 73 | 28 6e 41 63 74 69 76 65 |.Columns|(nActive|
|000049a0| 43 6f 6c 75 6d 6e 20 2d | 20 31 29 2e 53 45 54 46 |Column -| 1).SETF|
|000049b0| 4f 43 55 53 0d 0a 09 45 | 4c 53 45 0d 0a 09 09 2a |OCUS...E|LSE....*|
|000049c0| 20 20 49 66 20 74 68 65 | 72 65 20 69 73 20 6e 6f |  If the|re is no|
|000049d0| 74 68 69 6e 67 20 74 6f | 20 73 65 61 72 63 68 20 |thing to| search |
|000049e0| 66 6f 72 2c 20 64 69 73 | 61 62 6c 65 20 74 68 65 |for, dis|able the|
|000049f0| 20 46 69 6e 64 20 62 75 | 74 74 6f 6e 2e 0d 0a 09 | Find bu|tton....|
|00004a00| 09 49 46 20 21 49 53 4e | 55 4c 4c 28 45 56 41 4c |.IF !ISN|ULL(EVAL|
|00004a10| 28 22 46 69 6e 64 53 74 | 72 48 2e 22 20 2b 20 46 |("FindSt|rH." + F|
|00004a20| 49 45 4c 44 28 31 2c 22 | 46 69 6e 64 53 74 72 48 |IELD(1,"|FindStrH|
|00004a30| 22 29 29 29 20 3b 0d 0a | 09 09 09 41 4e 44 20 21 |"))) ;..|...AND !|
|00004a40| 49 53 42 4c 41 4e 4b 28 | 45 56 41 4c 28 22 46 69 |ISBLANK(|EVAL("Fi|
|00004a50| 6e 64 53 74 72 48 2e 22 | 20 2b 20 46 49 45 4c 44 |ndStrH."| + FIELD|
|00004a60| 28 31 2c 20 22 46 69 6e | 64 53 74 72 48 22 29 29 |(1, "Fin|dStrH"))|
|00004a70| 29 0d 0a 09 09 09 54 48 | 49 53 46 4f 52 4d 2e 63 |).....TH|ISFORM.c|
|00004a80| 6d 64 46 69 6e 64 2e 45 | 6e 61 62 6c 65 64 20 3d |mdFind.E|nabled =|
|00004a90| 20 2e 54 2e 0d 0a 09 09 | 45 4c 53 45 0d 0a 09 09 | .T.....|ELSE....|
|00004aa0| 09 54 48 49 53 46 4f 52 | 4d 2e 63 6d 64 46 69 6e |.THISFOR|M.cmdFin|
|00004ab0| 64 2e 45 6e 61 62 6c 65 | 64 20 3d 20 2e 46 2e 0d |d.Enable|d = .F..|
|00004ac0| 0a 09 09 45 4e 44 49 46 | 0d 0a 09 45 4e 44 49 46 |...ENDIF|...ENDIF|
|00004ad0| 0d 0a 09 54 48 49 53 46 | 4f 52 4d 2e 52 45 46 52 |...THISF|ORM.REFR|
|00004ae0| 45 53 48 0d 0a 43 41 53 | 45 20 6e 4b 65 79 43 6f |ESH..CAS|E nKeyCo|
|00004af0| 64 65 20 3d 20 39 20 09 | 09 26 26 20 54 61 62 0d |de = 9 .|.&& Tab.|
|00004b00| 0a 09 2a 2a 20 44 65 66 | 61 75 6c 74 20 66 6f 72 |..** Def|ault for|
|00004b10| 20 74 68 65 20 67 72 69 | 64 20 69 73 20 74 6f 20 | the gri|d is to |
|00004b20| 6d 6f 76 65 20 74 6f 20 | 6e 65 78 74 20 66 69 65 |move to |next fie|
|00004b30| 6c 64 20 69 6e 20 67 72 | 69 64 2e 20 20 4e 65 65 |ld in gr|id.  Nee|
|00004b40| 64 73 20 74 6f 20 6d 6f | 76 65 20 66 6f 63 75 73 |ds to mo|ve focus|
|00004b50| 20 74 6f 0d 0a 09 2a 2a | 20 6e 65 78 74 20 63 6f | to...**| next co|
|00004b60| 6e 74 72 6f 6c 2e 0d 0a | 09 4e 4f 44 45 46 41 55 |ntrol...|.NODEFAU|
|00004b70| 4c 54 0d 0a 09 54 48 49 | 53 46 4f 52 4d 2e 6f 70 |LT...THI|SFORM.op|
|00004b80| 74 53 65 61 72 63 68 44 | 69 72 65 63 74 69 6f 6e |tSearchD|irection|
|00004b90| 2e 4f 50 54 49 4f 4e 31 | 2e 53 45 54 46 4f 43 55 |.OPTION1|.SETFOCU|
|00004ba0| 53 0d 0a 43 41 53 45 20 | 6e 4b 65 79 43 6f 64 65 |S..CASE |nKeyCode|
|00004bb0| 20 3d 20 31 35 09 09 26 | 26 20 53 68 69 66 74 54 | = 15..&|& ShiftT|
|00004bc0| 61 62 2e 0d 0a 09 4e 4f | 44 45 46 41 55 4c 54 0d |ab....NO|DEFAULT.|
|00004bd0| 0a 09 54 48 49 53 46 4f | 52 4d 2e 4c 6f 63 6b 73 |..THISFO|RM.Locks|
|00004be0| 63 72 65 65 6e 20 3d 20 | 2e 54 2e 0d 0a 09 54 48 |creen = |.T....TH|
|00004bf0| 49 53 46 4f 52 4d 2e 67 | 72 64 43 68 61 72 2e 43 |ISFORM.g|rdChar.C|
|00004c00| 6f 6c 75 6d 6e 73 28 54 | 68 69 73 2e 70 61 72 65 |olumns(T|his.pare|
|00004c10| 6e 74 2e 70 61 72 65 6e | 74 2e 41 63 74 69 76 65 |nt.paren|t.Active|
|00004c20| 43 6f 6c 75 6d 6e 29 2e | 53 45 54 46 4f 43 55 53 |Column).|SETFOCUS|
|00004c30| 0d 0a 09 54 48 49 53 46 | 4f 52 4d 2e 4c 6f 63 6b |...THISF|ORM.Lock|
|00004c40| 73 63 72 65 65 6e 20 3d | 20 2e 46 2e 0d 0a 45 4e |screen =| .F...EN|
|00004c50| 44 43 41 53 45 0d 0a 0d | 0a 45 4e 44 50 52 4f 43 |DCASE...|.ENDPROC|
|00004c60| 0d 0a 50 52 4f 43 45 44 | 55 52 45 20 47 6f 74 46 |..PROCED|URE GotF|
|00004c70| 6f 63 75 73 0d 0a 2a 2a | 20 54 6f 20 6d 61 6b 65 |ocus..**| To make|
|00004c80| 20 67 72 69 64 20 61 63 | 74 20 6d 6f 72 65 20 6c | grid ac|t more l|
|00004c90| 69 6b 65 20 74 65 78 74 | 62 6f 78 2c 20 6d 61 6b |ike text|box, mak|
|00004ca0| 65 20 66 6f 63 75 73 20 | 6d 6f 76 65 20 74 6f 20 |e focus |move to |
|00004cb0| 63 65 6c 6c 20 6a 75 73 | 74 20 61 66 74 65 72 20 |cell jus|t after |
|00004cc0| 6c 61 73 74 0d 0a 2a 2a | 20 6e 6f 6e 2d 62 6c 61 |last..**| non-bla|
|00004cd0| 6e 6b 20 63 65 6c 6c 20 | 69 66 20 75 73 65 72 20 |nk cell |if user |
|00004ce0| 63 6c 69 63 6b 73 20 74 | 6f 20 74 68 65 20 72 69 |clicks t|o the ri|
|00004cf0| 67 68 74 20 6f 66 20 6e | 6f 6e 2d 62 6c 61 6e 6b |ght of n|on-blank|
|00004d00| 20 63 65 6c 6c 73 0d 0a | 57 49 54 48 20 54 48 49 | cells..|WITH THI|
|00004d10| 53 2e 50 41 52 45 4e 54 | 2e 50 41 52 45 4e 54 0d |S.PARENT|.PARENT.|
|00004d20| 0a 6e 50 72 65 76 69 6f | 75 73 43 6f 6c 75 6d 6e |.nPrevio|usColumn|
|00004d30| 20 3d 20 2e 41 63 74 69 | 76 65 43 6f 6c 75 6d 6e | = .Acti|veColumn|
|00004d40| 20 2d 20 31 0d 0a 49 46 | 20 6e 50 72 65 76 69 6f | - 1..IF| nPrevio|
|00004d50| 75 73 43 6f 6c 75 6d 6e | 20 3e 20 30 20 41 4e 44 |usColumn| > 0 AND|
|00004d60| 20 49 53 42 4c 41 4e 4b | 28 41 4c 4c 54 52 49 4d | ISBLANK|(ALLTRIM|
|00004d70| 28 2e 43 4f 4c 55 4d 4e | 53 28 6e 50 72 65 76 69 |(.COLUMN|S(nPrevi|
|00004d80| 6f 75 73 43 6f 6c 75 6d | 6e 29 2e 54 65 78 74 31 |ousColum|n).Text1|
|00004d90| 2e 56 41 4c 55 45 29 29 | 0d 0a 09 54 48 49 53 46 |.VALUE))|...THISF|
|00004da0| 4f 52 4d 2e 4c 4f 43 4b | 53 43 52 45 45 4e 20 3d |ORM.LOCK|SCREEN =|
|00004db0| 20 2e 54 2e 0d 0a 09 46 | 4f 52 20 6e 43 75 72 72 | .T....F|OR nCurr|
|00004dc0| 65 6e 74 43 6f 6c 20 3d | 20 6e 50 72 65 76 69 6f |entCol =| nPrevio|
|00004dd0| 75 73 43 6f 6c 75 6d 6e | 20 74 6f 20 31 20 53 54 |usColumn| to 1 ST|
|00004de0| 45 50 20 2d 31 0d 0a 09 | 09 49 46 20 21 49 53 42 |EP -1...|.IF !ISB|
|00004df0| 4c 41 4e 4b 28 41 4c 4c | 54 52 49 4d 28 2e 43 4f |LANK(ALL|TRIM(.CO|
|00004e00| 4c 55 4d 4e 53 28 6e 43 | 75 72 72 65 6e 74 43 6f |LUMNS(nC|urrentCo|
|00004e10| 6c 29 2e 54 65 78 74 31 | 2e 56 41 4c 55 45 29 29 |l).Text1|.VALUE))|
|00004e20| 0d 0a 09 09 09 45 58 49 | 54 0d 0a 09 09 45 4e 44 |.....EXI|T....END|
|00004e30| 49 46 0d 0a 09 4e 45 58 | 54 0d 0a 09 49 46 20 6e |IF...NEX|T...IF n|
|00004e40| 43 75 72 72 65 6e 74 43 | 6f 6c 20 21 3d 20 6e 50 |CurrentC|ol != nP|
|00004e50| 72 65 76 69 6f 75 73 63 | 6f 6c 75 6d 6e 09 09 26 |reviousc|olumn..&|
|00004e60| 26 20 44 69 64 20 77 65 | 20 68 61 76 65 20 74 6f |& Did we| have to|
|00004e70| 20 6d 6f 76 65 3f 0d 0a | 09 09 2e 43 4f 4c 55 4d | move?..|...COLUM|
|00004e80| 4e 53 28 6e 43 75 72 72 | 65 6e 74 43 6f 6c 20 2b |NS(nCurr|entCol +|
|00004e90| 20 31 29 2e 53 45 54 46 | 4f 43 55 53 0d 0a 09 09 | 1).SETF|OCUS....|
|00004ea0| 2e 52 45 46 52 45 53 48 | 0d 0a 09 45 4e 44 49 46 |.REFRESH|...ENDIF|
|00004eb0| 0d 0a 09 54 48 49 53 46 | 4f 52 4d 2e 4c 4f 43 4b |...THISF|ORM.LOCK|
|00004ec0| 53 43 52 45 45 4e 20 3d | 20 2e 46 2e 0d 0a 45 4e |SCREEN =| .F...EN|
|00004ed0| 44 49 46 0d 0a 45 4e 44 | 57 49 54 48 0d 0a 0d 0a |DIF..END|WITH....|
|00004ee0| 45 4e 44 50 52 4f 43 0d | 0a 50 52 4f 43 45 44 55 |ENDPROC.|.PROCEDU|
|00004ef0| 52 45 20 49 6e 74 65 72 | 61 63 74 69 76 65 43 68 |RE Inter|activeCh|
|00004f00| 61 6e 67 65 0d 0a 2a 2a | 20 54 68 69 73 20 63 65 |ange..**| This ce|
|00004f10| 6c 6c 20 68 61 73 20 62 | 65 65 6e 20 65 64 69 74 |ll has b|een edit|
|00004f20| 65 64 2e 20 20 54 72 61 | 6e 73 6c 61 74 65 20 61 |ed.  Tra|nslate a|
|00004f30| 6e 64 20 75 70 64 61 74 | 65 20 43 68 61 72 61 63 |nd updat|e Charac|
|00004f40| 74 65 72 20 67 72 69 64 | 2e 0d 0a 6e 43 75 72 72 |ter grid|...nCurr|
|00004f50| 65 6e 74 43 6f 6c 20 3d | 20 54 48 49 53 2e 50 41 |entCol =| THIS.PA|
|00004f60| 52 45 4e 54 2e 50 41 52 | 45 4e 54 2e 41 63 74 69 |RENT.PAR|ENT.Acti|
|00004f70| 76 65 43 6f 6c 75 6d 6e | 0d 0a 63 54 65 6d 70 54 |veColumn|..cTempT|
|00004f80| 65 78 74 20 3d 20 54 48 | 49 53 2e 56 41 4c 55 45 |ext = TH|IS.VALUE|
|00004f90| 0d 0a 0d 0a 49 46 20 49 | 53 42 4c 41 4e 4b 28 63 |....IF I|SBLANK(c|
|00004fa0| 54 65 6d 70 54 65 78 74 | 29 20 4f 52 20 49 53 4e |TempText|) OR ISN|
|00004fb0| 55 4c 4c 28 63 54 65 6d | 70 54 65 78 74 29 0d 0a |ULL(cTem|pText)..|
|00004fc0| 09 52 45 50 4c 41 43 45 | 20 28 46 49 45 4c 44 28 |.REPLACE| (FIELD(|
|00004fd0| 6e 43 75 72 72 65 6e 74 | 43 6f 6c 2c 20 22 46 69 |nCurrent|Col, "Fi|
|00004fe0| 6e 64 53 74 72 22 29 29 | 20 57 49 54 48 20 22 22 |ndStr"))| WITH ""|
|00004ff0| 20 49 4e 20 22 46 69 6e | 64 53 74 72 22 0d 0a 45 | IN "Fin|dStr"..E|
|00005000| 4c 53 45 0d 0a 09 52 45 | 50 4c 41 43 45 20 28 46 |LSE...RE|PLACE (F|
|00005010| 49 45 4c 44 28 6e 43 75 | 72 72 65 6e 74 43 6f 6c |IELD(nCu|rrentCol|
|00005020| 2c 20 22 46 69 6e 64 53 | 74 72 22 29 29 20 57 49 |, "FindS|tr")) WI|
|00005030| 54 48 20 43 48 52 28 54 | 48 49 53 46 4f 52 4d 53 |TH CHR(T|HISFORMS|
|00005040| 45 54 2e 48 45 58 32 44 | 45 43 28 63 54 65 6d 70 |ET.HEX2D|EC(cTemp|
|00005050| 54 65 78 74 29 29 20 49 | 4e 20 22 46 69 6e 64 53 |Text)) I|N "FindS|
|00005060| 74 72 22 0d 0a 45 4e 44 | 49 46 0d 0a 2a 54 48 49 |tr"..END|IF..*THI|
|00005070| 53 46 4f 52 4d 2e 67 72 | 64 43 68 61 72 2e 43 6f |SFORM.gr|dChar.Co|
|00005080| 6c 75 6d 6e 73 28 6e 43 | 75 72 72 65 6e 74 43 6f |lumns(nC|urrentCo|
|00005090| 6c 29 2e 52 45 46 52 45 | 53 48 0d 0a 57 49 54 48 |l).REFRE|SH..WITH|
|000050a0| 20 54 48 49 53 46 4f 52 | 4d 0d 0a 09 2a 20 20 55 | THISFOR|M...*  U|
|000050b0| 70 64 61 74 65 20 74 68 | 65 20 48 65 78 20 67 72 |pdate th|e Hex gr|
|000050c0| 69 64 2e 0d 0a 2a 09 2e | 67 72 64 48 65 78 2e 43 |id...*..|grdHex.C|
|000050d0| 6f 6c 75 6d 6e 73 28 6e | 43 75 72 72 65 6e 74 43 |olumns(n|CurrentC|
|000050e0| 6f 6c 29 2e 54 65 78 74 | 31 2e 56 61 6c 75 65 20 |ol).Text|1.Value |
|000050f0| 3d 20 63 54 65 6d 70 54 | 65 78 74 0d 0a 09 2e 67 |= cTempT|ext....g|
|00005100| 72 64 43 68 61 72 2e 43 | 6f 6c 75 6d 6e 73 28 6e |rdChar.C|olumns(n|
|00005110| 43 75 72 72 65 6e 74 43 | 6f 6c 29 2e 52 45 46 52 |CurrentC|ol).REFR|
|00005120| 45 53 48 0d 0a 09 0d 0a | 09 2a 20 20 49 66 20 74 |ESH.....|.*  If t|
|00005130| 68 65 72 65 20 69 73 20 | 73 6f 6d 65 74 68 69 6e |here is |somethin|
|00005140| 67 20 74 6f 20 73 65 61 | 72 63 68 20 66 6f 72 2c |g to sea|rch for,|
|00005150| 20 65 6e 61 62 6c 65 20 | 74 68 65 20 46 69 6e 64 | enable |the Find|
|00005160| 20 62 75 74 74 6f 6e 2e | 0d 0a 09 49 46 20 21 49 | button.|...IF !I|
|00005170| 53 4e 55 4c 4c 28 45 56 | 41 4c 28 22 46 69 6e 64 |SNULL(EV|AL("Find|
|00005180| 53 74 72 48 2e 22 20 2b | 20 46 49 45 4c 44 28 31 |StrH." +| FIELD(1|
|00005190| 2c 22 46 69 6e 64 53 74 | 72 48 22 29 29 29 20 3b |,"FindSt|rH"))) ;|
|000051a0| 0d 0a 09 09 41 4e 44 20 | 21 49 53 42 4c 41 4e 4b |....AND |!ISBLANK|
|000051b0| 28 45 56 41 4c 28 22 46 | 69 6e 64 53 74 72 48 2e |(EVAL("F|indStrH.|
|000051c0| 22 20 2b 20 46 49 45 4c | 44 28 31 2c 20 22 46 69 |" + FIEL|D(1, "Fi|
|000051d0| 6e 64 53 74 72 48 22 29 | 29 29 0d 0a 09 09 2e 63 |ndStrH")|)).....c|
|000051e0| 6d 64 46 69 6e 64 2e 45 | 6e 61 62 6c 65 64 20 3d |mdFind.E|nabled =|
|000051f0| 20 2e 54 2e 0d 0a 09 45 | 4c 53 45 0d 0a 09 09 2e | .T....E|LSE.....|
|00005200| 63 6d 64 46 69 6e 64 2e | 45 6e 61 62 6c 65 64 20 |cmdFind.|Enabled |
|00005210| 3d 20 2e 46 2e 0d 0a 09 | 45 4e 44 49 46 0d 0a 45 |= .F....|ENDIF..E|
|00005220| 4e 44 57 49 54 48 0d 0a | 0d 0a 0d 0a 0d 0a 0d 0a |NDWITH..|........|
|00005230| 45 4e 44 50 52 4f 43 0d | 0a 00 00 00 01 00 00 00 |ENDPROC.|........|
|00005240| a8 46 6f 6e 74 4e 61 6d | 65 20 3d 20 22 43 6f 75 |.FontNam|e = "Cou|
|00005250| 72 69 65 72 22 0d 0a 46 | 6f 6e 74 53 69 7a 65 20 |rier"..F|ontSize |
|00005260| 3d 20 38 0d 0a 42 6f 72 | 64 65 72 53 74 79 6c 65 |= 8..Bor|derStyle|
|00005270| 20 3d 20 30 0d 0a 46 6f | 72 6d 61 74 20 3d 20 22 | = 0..Fo|rmat = "|
|00005280| 22 0d 0a 48 65 69 67 68 | 74 20 3d 20 32 31 0d 0a |"..Heigh|t = 21..|
|00005290| 49 6e 70 75 74 4d 61 73 | 6b 20 3d 20 22 58 58 22 |InputMas|k = "XX"|
|000052a0| 0d 0a 4d 61 72 67 69 6e | 20 3d 20 30 0d 0a 53 70 |..Margin| = 0..Sp|
|000052b0| 65 63 69 61 6c 45 66 66 | 65 63 74 20 3d 20 31 0d |ecialEff|ect = 1.|
|000052c0| 0a 57 69 64 74 68 20 3d | 20 31 30 30 0d 0a 4e 61 |.Width =| 100..Na|
|000052d0| 6d 65 20 3d 20 22 74 78 | 74 66 69 6e 64 73 74 72 |me = "tx|tfindstr|
|000052e0| 69 6e 67 68 65 78 22 0d | 0a 00 00 00 01 00 00 00 |inghex".|........|
|000052f0| 07 74 65 78 74 62 6f 78 |                         |.textbox|        |
+--------+-------------------------+-------------------------+--------+--------+